Eagles Nest BBS 8

home *** CD-ROM | disk | FTP | other *** search
/ Eagles Nest BBS 8 / Eagles_Nest_Mac_Collection_Disc_8.TOAST / Developer Tools⁄Additions / TechNotesStk / Technical Notes Stack / Technical Notes Stack 4.0.1 / Technical Notes Stack 4.0.1
HyperCard Stack | 1991-04-29 | 2.2 MB | [STAK/WILD]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: HyperCard Stack (archive/hypercard).
Confidence	Program	Detection	Match Type	Support
`100%`	dexvert	HyperCard Stack `(archive/hypercard)`	magic	Supported
`1%`	dexvert	PageFocus Data `(other/pageFocusData)`	ext	Unsupported
`1%`	dexvert	Banyans VINES patch data `(other/banyansVINESPatchData)`	ext	Unsupported
`100%`	file	data	default
`100%`	TrID	HyperCard Stack	default
`100%`	siegfried	fmt/1490 HyperCard Stack	default
id metadata
key	value
macFileType	`[STAK]`
macFileCreator	`[WILD]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 52 00 53 54 41 4b | ff ff ff ff 00 00 00 00 |..R.STAK|........|
|00000010| 00 00 00 0a 00 22 80 00 | 00 00 52 00 00 00 00 02 |....."..|..R.....|
|00000020| 00 00 00 02 00 00 00 03 | 00 00 0a 97 00 00 01 35 |........|.......5|
|00000030| 00 00 d4 d6 00 00 d7 50 | 00 00 00 02 00 00 5f e0 |.......P|......_.|
|00000040| 00 00 e7 1c 00 00 00 00 | 00 05 00 00 90 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 02 01 80 00 | 02 00 80 00 02 10 60 12 |........|......`.|
|00000070| fc 6e 2e 68 00 00 00 00 | 00 25 00 00 01 7b 02 00 |.n.h....|.%...{..|
|00000080| 00 00 00 00 01 e0 02 80 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 ad b4 00 00 67 db | 00 00 00 00 00 00 00 00 |......g.|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|000002d0| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|000002e0| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|000002f0| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000300| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000310| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|00000320| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|00000330| c4 80 0c 68 43 02 30 26 | 77 77 77 77 77 77 77 77 |...hC.0&|wwwwwwww|
|00000340| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|00000350| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|00000360| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|00000370| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000380| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000390| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|000003a0| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|000003b0| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|000003c0| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|000003d0| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|000003e0| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|000003f0| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000400| 00 01 e4 60 00 00 4e e0 | 00 22 6e e0 00 00 11 00 |...`..N.|."n.....|
|00000410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 2d 2d 20 4d 61 63 69 6e | 74 6f 73 68 20 54 65 63 |-- Macin|tosh Tec|
|00000610| 68 6e 69 63 61 6c 20 4e | 6f 74 65 73 20 53 74 61 |hnical N|otes Sta|
|00000620| 63 6b 20 a5 20 44 4f 20 | 4e 4f 54 20 52 45 4d 4f |ck . DO |NOT REMO|
|00000630| 56 45 20 54 48 49 53 20 | 4c 49 4e 45 0d 2d 2d 20 |VE THIS |LINE.-- |
|00000640| 76 65 72 73 69 6f 6e 3a | 20 34 2e 30 2e 31 20 a5 |version:| 4.0.1 .|
|00000650| 20 41 70 72 69 6c 20 31 | 39 39 31 0d 2d 2d 20 43 | April 1|991.-- C|
|00000660| 6f 70 79 72 69 67 68 74 | 20 31 39 38 38 2d 31 39 |opyright| 1988-19|
|00000670| 39 30 20 62 79 20 41 70 | 70 6c 65 20 43 6f 6d 70 |90 by Ap|ple Comp|
|00000680| 75 74 65 72 2c 20 49 6e | 63 2e 0d 2d 2d 20 41 6c |uter, In|c..-- Al|
|00000690| 6c 20 52 69 67 68 74 73 | 20 52 65 73 65 72 76 65 |l Rights| Reserve|
|000006a0| 64 2e 0d 2d 2d 0d 2d 2d | 0d 2d 2d 20 46 55 4e 43 |d..--.--|.-- FUNC|
|000006b0| 54 49 4f 4e 53 3a 20 70 | 72 69 6e 74 49 74 2c 20 |TIONS: p|rintIt, |
|000006c0| 66 69 6e 64 58 52 45 46 | 2c 20 66 69 6e 64 54 65 |findXREF|, findTe|
|000006d0| 63 68 4e 6f 74 65 0d 2d | 2d 0d 0d 6f 6e 20 70 72 |chNote.-|-..on pr|
|000006e0| 65 66 65 72 65 6e 63 65 | 73 0d 6c 6f 63 6b 20 73 |eference|s.lock s|
|000006f0| 63 72 65 65 6e 0d 70 75 | 73 68 20 63 61 72 64 0d |creen.pu|sh card.|
|00000700| 67 6f 20 63 61 72 64 20 | 69 64 20 38 32 31 33 33 |go card |id 82133|
|00000710| 0d 75 6e 6c 6f 63 6b 20 | 73 63 72 65 65 6e 0d 65 |.unlock |screen.e|
|00000720| 6e 64 20 70 72 65 66 65 | 72 65 6e 63 65 73 0d 0d |nd prefe|rences..|
|00000730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000740| 2d 0d 2d 2d 20 73 74 61 | 72 74 55 70 20 68 61 6e |-.-- sta|rtUp han|
|00000750| 64 6c 65 72 0d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |dler.---|--------|
|00000760| 2d 2d 2d 2d 2d 2d 0d 6f | 6e 20 73 74 61 72 74 55 |------.o|n startU|
|00000770| 70 0d 67 6c 6f 62 61 6c | 20 73 74 61 72 74 75 70 |p.global| startup|
|00000780| 73 0d 61 64 64 20 31 20 | 74 6f 20 73 74 61 72 74 |s.add 1 |to start|
|00000790| 75 70 73 0d 69 66 20 73 | 74 61 72 74 75 70 73 20 |ups.if s|tartups |
|000007a0| 3d 20 31 20 74 68 65 6e | 0d 73 65 6e 64 20 22 73 |= 1 then|.send "s|
|000007b0| 74 61 72 74 55 70 22 20 | 74 6f 20 48 6f 6d 65 0d |tartUp" |to Home.|
|000007c0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 73 74 61 72 74 |end if.e|nd start|
|000007d0| 55 70 0d 0d 2d 2d 20 62 | 65 67 69 6e 20 70 6a 66 |Up..-- b|egin pjf|
|000007e0| 20 6e 65 77 20 33 2f 32 | 37 0d 2d 2d 2d 2d 2d 2d | new 3/2|7.------|
|000007f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2d 2d 20 6f |--------|---.-- o|
|00000800| 70 65 6e 73 74 61 63 6b | 20 68 61 6e 64 6c 65 72 |penstack| handler|
|00000810| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00000820| 2d 2d 0d 6f 6e 20 6f 70 | 65 6e 73 74 61 63 6b 0d |--.on op|enstack.|
|00000830| 67 6c 6f 62 61 6c 20 70 | 66 42 65 65 6e 42 65 66 |global p|fBeenBef|
|00000840| 6f 72 65 0d 61 64 64 20 | 31 20 74 6f 20 6c 69 6e |ore.add |1 to lin|
|00000850| 65 20 33 20 6f 66 20 70 | 66 42 65 65 6e 42 65 66 |e 3 of p|fBeenBef|
|00000860| 6f 72 65 0d 72 65 73 65 | 74 20 6d 65 6e 75 62 61 |ore.rese|t menuba|
|00000870| 72 0d 6d 61 6b 65 4d 65 | 6e 75 73 0d 69 66 20 6c |r.makeMe|nus.if l|
|00000880| 69 6e 65 20 33 20 6f 66 | 20 70 66 42 65 65 6e 42 |ine 3 of| pfBeenB|
|00000890| 65 66 6f 72 65 20 69 73 | 20 31 20 74 68 65 6e 0d |efore is| 1 then.|
|000008a0| 4f 6e 65 54 69 6d 65 4f | 6e 6c 79 0d 65 6e 64 20 |OneTimeO|nly.end |
|000008b0| 69 66 0d 69 66 20 74 68 | 65 20 6f 70 74 69 6f 6e |if.if th|e option|
|000008c0| 6b 65 79 20 69 73 20 6e | 6f 74 20 64 6f 77 6e 20 |key is n|ot down |
|000008d0| 74 68 65 6e 0d 73 65 74 | 20 63 61 6e 74 6d 6f 64 |then.set| cantmod|
|000008e0| 69 66 79 20 6f 66 20 74 | 68 69 73 20 73 74 61 63 |ify of t|his stac|
|000008f0| 6b 20 74 6f 20 74 72 75 | 65 0d 73 65 74 20 74 68 |k to tru|e.set th|
|00000900| 65 20 75 73 65 72 6c 65 | 76 65 6c 20 74 6f 20 34 |e userle|vel to 4|
|00000910| 0d 65 6c 73 65 0d 73 65 | 74 20 63 61 6e 74 6d 6f |.else.se|t cantmo|
|00000920| 64 69 66 79 20 6f 66 20 | 74 68 69 73 20 73 74 61 |dify of |this sta|
|00000930| 63 6b 20 74 6f 20 66 61 | 6c 73 65 0d 73 65 74 20 |ck to fa|lse.set |
|00000940| 74 68 65 20 75 73 65 72 | 6c 65 76 65 6c 20 74 6f |the user|level to|
|00000950| 20 35 0d 65 6e 64 20 69 | 66 0d 73 65 74 20 75 73 | 5.end i|f.set us|
|00000960| 65 72 6d 6f 64 69 66 79 | 20 74 6f 20 74 72 75 65 |ermodify| to true|
|00000970| 0d 65 6e 64 20 6f 70 65 | 6e 73 74 61 63 6b 0d 0d |.end ope|nstack..|
|00000980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000990| 2d 0d 2d 2d 20 4f 6e 65 | 54 69 6d 65 4f 6e 6c 79 |-.-- One|TimeOnly|
|000009a0| 20 68 61 6e 64 6c 65 72 | 0d 2d 2d 2d 2d 2d 2d 2d | handler|.-------|
|000009b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 6f 6e 20 4f 6e |--------|--.on On|
|000009c0| 65 54 69 6d 65 4f 6e 6c | 79 0d 67 6c 6f 62 61 6c |eTimeOnl|y.global|
|000009d0| 20 6c 69 73 74 42 79 54 | 68 65 4e 75 6d 62 65 72 | listByT|heNumber|
|000009e0| 2c 20 6c 69 73 74 4c 65 | 6e 67 74 68 2c 20 74 68 |, listLe|ngth, th|
|000009f0| 65 43 61 72 64 4f 66 66 | 53 65 74 2c 20 74 68 65 |eCardOff|Set, the|
|00000a00| 45 6e 76 73 0d 67 6c 6f | 62 61 6c 20 74 68 65 53 |Envs.glo|bal theS|
|00000a10| 79 73 2c 20 68 6f 6d 65 | 54 6f 0d 2d 2d 0d 73 65 |ys, home|To.--.se|
|00000a20| 74 20 63 75 72 73 6f 72 | 20 74 6f 20 62 75 73 79 |t cursor| to busy|
|00000a30| 0d 6c 6f 63 6b 20 73 63 | 72 65 65 6e 0d 2d 2d 0d |.lock sc|reen.--.|
|00000a40| 70 75 73 68 20 63 61 72 | 64 0d 67 6f 20 63 61 72 |push car|d.go car|
|00000a50| 64 20 69 64 20 38 32 31 | 33 33 0d 72 65 73 65 74 |d id 821|33.reset|
|00000a60| 70 72 65 66 73 20 73 74 | 61 72 74 75 70 0d 70 6f |prefs st|artup.po|
|00000a70| 70 20 63 61 72 64 0d 2d | 2d 0d 73 65 74 20 6c 6f |p card.-|-.set lo|
|00000a80| 63 6b 6d 65 73 73 61 67 | 65 73 20 74 6f 20 74 72 |ckmessag|es to tr|
|00000a90| 75 65 0d 2d 2d 0d 70 75 | 73 68 20 63 61 72 64 0d |ue.--.pu|sh card.|
|00000aa0| 67 6f 20 62 67 20 22 43 | 6f 6e 74 72 6f 6c 22 0d |go bg "C|ontrol".|
|00000ab0| 68 6f 6d 65 69 63 6f 6e | 0d 73 65 74 20 73 74 79 |homeicon|.set sty|
|00000ac0| 6c 65 20 6f 66 20 62 67 | 20 66 6c 64 20 22 74 68 |le of bg| fld "th|
|00000ad0| 65 4c 69 73 74 22 20 74 | 6f 20 72 65 63 74 61 6e |eList" t|o rectan|
|00000ae0| 67 6c 65 0d 67 6f 20 62 | 67 20 22 4d 61 69 6e 22 |gle.go b|g "Main"|
|00000af0| 0d 68 6f 6d 65 69 63 6f | 6e 0d 2d 2d 0d 49 6e 69 |.homeico|n.--.Ini|
|00000b00| 74 4c 69 73 74 69 6e 67 | 73 0d 2d 2d 0d 70 6f 70 |tListing|s.--.pop|
|00000b10| 20 63 61 72 64 0d 75 6e | 6c 6f 63 6b 20 73 63 72 | card.un|lock scr|
|00000b20| 65 65 6e 0d 73 65 74 20 | 6c 6f 63 6b 6d 65 73 73 |een.set |lockmess|
|00000b30| 61 67 65 73 20 74 6f 20 | 66 61 6c 73 65 0d 65 6e |ages to |false.en|
|00000b40| 64 20 4f 6e 65 54 69 6d | 65 4f 6e 6c 79 0d 2d 2d |d OneTim|eOnly.--|
|00000b50| 20 65 6e 64 20 70 6a 66 | 20 6e 65 77 20 33 2f 32 | end pjf| new 3/2|
|00000b60| 37 0d 0d 0d 6f 6e 20 49 | 6e 69 74 4c 69 73 74 69 |7...on I|nitListi|
|00000b70| 6e 67 73 0d 67 6c 6f 62 | 61 6c 20 6c 69 73 74 42 |ngs.glob|al listB|
|00000b80| 79 54 68 65 4e 75 6d 62 | 65 72 2c 20 6c 69 73 74 |yTheNumb|er, list|
|00000b90| 4c 65 6e 67 74 68 2c 20 | 74 68 65 43 61 72 64 4f |Length, |theCardO|
|00000ba0| 66 66 53 65 74 2c 20 74 | 68 65 45 6e 76 73 2c 74 |ffSet, t|heEnvs,t|
|00000bb0| 68 65 53 79 73 0d 69 66 | 20 6c 69 73 74 42 79 54 |heSys.if| listByT|
|00000bc0| 68 65 4e 75 6d 62 65 72 | 20 69 73 20 65 6d 70 74 |heNumber| is empt|
|00000bd0| 79 20 74 68 65 6e 0d 67 | 65 74 54 68 65 45 6e 76 |y then.g|etTheEnv|
|00000be0| 73 0d 70 75 74 20 74 68 | 65 20 6e 75 6d 62 65 72 |s.put th|e number|
|00000bf0| 20 6f 66 20 63 61 72 64 | 20 22 4e 75 6d 62 65 72 | of card| "Number|
|00000c00| 4c 69 73 74 69 6e 67 22 | 20 69 6e 74 6f 20 74 68 |Listing"| into th|
|00000c10| 65 43 61 72 64 4f 66 66 | 53 65 74 0d 70 75 74 20 |eCardOff|Set.put |
|00000c20| 63 61 72 64 20 66 69 65 | 6c 64 20 22 54 4f 43 22 |card fie|ld "TOC"|
|00000c30| 20 6f 66 20 63 61 72 64 | 20 74 68 65 43 61 72 64 | of card| theCard|
|00000c40| 4f 66 66 53 65 74 20 69 | 6e 74 6f 20 6c 69 73 74 |OffSet i|nto list|
|00000c50| 42 79 54 68 65 4e 75 6d | 62 65 72 0d 70 75 74 20 |ByTheNum|ber.put |
|00000c60| 6c 65 6e 67 74 68 28 6c | 69 73 74 42 79 54 68 65 |length(l|istByThe|
|00000c70| 4e 75 6d 62 65 72 29 20 | 69 6e 74 6f 20 6c 69 73 |Number) |into lis|
|00000c80| 74 4c 65 6e 67 74 68 0d | 65 6e 64 20 69 66 0d 65 |tLength.|end if.e|
|00000c90| 6e 64 20 49 6e 69 74 4c | 69 73 74 69 6e 67 73 0d |nd InitL|istings.|
|00000ca0| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00000cb0| 2d 2d 2d 0d 2d 2d 20 68 | 6f 6d 65 69 63 6f 6e 20 |---.-- h|omeicon |
|00000cc0| 68 61 6e 64 6c 65 72 0d | 2d 2d 2d 2d 2d 2d 2d 2d |handler.|--------|
|00000cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2d 2d 20 66 69 |--------|--.-- fi|
|00000ce0| 78 20 74 68 65 20 6e 61 | 76 69 67 61 74 69 6f 6e |x the na|vigation|
|00000cf0| 20 69 63 6f 6e 73 20 66 | 72 6f 6d 20 61 6e 79 77 | icons f|rom anyw|
|00000d00| 68 65 72 65 20 69 6e 20 | 74 68 65 20 73 74 61 63 |here in |the stac|
|00000d10| 6b 0d 0d 6f 6e 20 68 6f | 6d 65 69 63 6f 6e 0d 67 |k..on ho|meicon.g|
|00000d20| 6c 6f 62 61 6c 20 68 6f | 6d 65 74 6f 0d 69 66 20 |lobal ho|meto.if |
|00000d30| 68 6f 6d 65 54 6f 20 69 | 73 20 65 6d 70 74 79 20 |homeTo i|s empty |
|00000d40| 74 68 65 6e 0d 73 65 74 | 20 69 63 6f 6e 20 6f 66 |then.set| icon of|
|00000d50| 20 62 67 20 62 74 6e 20 | 22 48 6f 6d 65 22 20 74 | bg btn |"Home" t|
|00000d60| 6f 20 22 48 6f 6d 65 22 | 0d 65 6c 73 65 0d 73 65 |o "Home"|.else.se|
|00000d70| 74 20 69 63 6f 6e 20 6f | 66 20 62 67 20 62 74 6e |t icon o|f bg btn|
|00000d80| 20 22 48 6f 6d 65 22 20 | 74 6f 20 22 48 6f 6d 65 | "Home" |to "Home|
|00000d90| 20 42 61 73 65 22 0d 65 | 6e 64 20 69 66 0d 65 6e | Base".e|nd if.en|
|00000da0| 64 20 68 6f 6d 65 69 63 | 6f 6e 0d 0d 2d 2d 2d 2d |d homeic|on..----|
|00000db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2d 2d |--------|-----.--|
|00000dc0| 20 67 65 74 54 68 65 45 | 6e 76 73 20 68 61 6e 64 | getTheE|nvs hand|
|00000dd0| 6c 65 72 0d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ler.----|--------|
|00000de0| 2d 2d 2d 2d 2d 0d 6f 6e | 20 67 65 74 54 68 65 45 |-----.on| getTheE|
|00000df0| 6e 76 73 0d 67 6c 6f 62 | 61 6c 20 74 68 65 45 6e |nvs.glob|al theEn|
|00000e00| 76 73 2c 20 74 68 65 45 | 6e 76 73 6d 0d 70 75 74 |vs, theE|nvsm.put|
|00000e10| 20 65 6d 70 74 79 20 69 | 6e 74 6f 20 74 68 65 45 | empty i|nto theE|
|00000e20| 6e 76 73 6d 0d 70 75 74 | 20 73 79 73 45 6e 76 28 |nvsm.put| sysEnv(|
|00000e30| 29 20 69 6e 74 6f 20 74 | 68 65 53 79 73 0d 69 66 |) into t|heSys.if|
|00000e40| 20 63 68 61 72 20 34 20 | 6f 66 20 74 68 65 20 6c | char 4 |of the l|
|00000e50| 6f 6e 67 20 76 65 72 73 | 69 6f 6e 20 ad 20 22 30 |ong vers|ion . "0|
|00000e60| 22 20 74 68 65 6e 0d 70 | 75 74 20 63 68 61 72 20 |" then.p|ut char |
|00000e70| 32 20 6f 66 20 74 68 65 | 20 6c 6f 6e 67 20 76 65 |2 of the| long ve|
|00000e80| 72 73 69 6f 6e 20 26 20 | 22 2e 22 20 26 c2 0d 63 |rsion & |"." &..c|
|00000e90| 68 61 72 20 33 20 6f 66 | 20 74 68 65 20 6c 6f 6e |har 3 of| the lon|
|00000ea0| 67 20 76 65 72 73 69 6f | 6e 20 26 20 22 2e 22 20 |g versio|n & "." |
|00000eb0| 26 c2 0d 63 68 61 72 20 | 34 20 6f 66 20 74 68 65 |&..char |4 of the|
|00000ec0| 20 6c 6f 6e 67 20 76 65 | 72 73 69 6f 6e 20 69 6e | long ve|rsion in|
|00000ed0| 74 6f 20 74 68 65 45 6e | 76 73 0d 65 6c 73 65 0d |to theEn|vs.else.|
|00000ee0| 70 75 74 20 74 68 65 20 | 76 65 72 73 69 6f 6e 20 |put the |version |
|00000ef0| 69 6e 74 6f 20 74 68 65 | 45 6e 76 73 0d 65 6e 64 |into the|Envs.end|
|00000f00| 20 69 66 0d 70 75 74 20 | 77 6f 72 64 20 33 20 74 | if.put |word 3 t|
|00000f10| 6f 20 6c 65 6e 67 74 68 | 28 6c 69 6e 65 20 32 20 |o length|(line 2 |
|00000f20| 6f 66 20 74 68 65 20 73 | 63 72 69 70 74 20 6f 66 |of the s|cript of|
|00000f30| 20 74 68 69 73 20 73 74 | 61 63 6b 29 20 c2 0d 6f | this st|ack) ..o|
|00000f40| 66 20 6c 69 6e 65 20 32 | 20 6f 66 20 74 68 65 20 |f line 2| of the |
|00000f50| 73 63 72 69 70 74 20 6f | 66 20 74 68 69 73 20 73 |script o|f this s|
|00000f60| 74 61 63 6b 20 26 20 72 | 65 74 75 72 6e 20 62 65 |tack & r|eturn be|
|00000f70| 66 6f 72 65 20 74 68 65 | 45 6e 76 73 0d 70 75 74 |fore the|Envs.put|
|00000f80| 20 72 65 74 75 72 6e 20 | 26 20 69 74 65 6d 20 32 | return |& item 2|
|00000f90| 20 6f 66 20 74 68 65 53 | 79 73 20 61 66 74 65 72 | of theS|ys after|
|00000fa0| 20 74 68 65 45 6e 76 73 | 0d 70 75 74 20 72 65 74 | theEnvs|.put ret|
|00000fb0| 75 72 6e 20 26 20 69 74 | 65 6d 20 31 20 6f 66 20 |urn & it|em 1 of |
|00000fc0| 6c 69 6e 65 20 32 20 6f | 66 20 74 68 65 53 79 73 |line 2 o|f theSys|
|00000fd0| 20 26 20 22 2d 62 69 74 | 22 20 26 20 22 2c 22 20 | & "-bit|" & "," |
|00000fe0| 26 26 c2 0d 69 74 65 6d | 20 32 20 6f 66 20 6c 69 |&&..item| 2 of li|
|00000ff0| 6e 65 20 32 20 6f 66 20 | 74 68 65 53 79 73 20 61 |ne 2 of |theSys a|
|00001000| 66 74 65 72 20 74 68 65 | 45 6e 76 73 0d 70 75 74 |fter the|Envs.put|
|00001010| 20 22 74 65 6e 6d 76 61 | 74 20 62 73 73 20 6e 20 | "tenmva|t bss n |
|00001020| 70 79 76 73 73 22 20 69 | 6e 74 6f 20 74 68 65 45 |pyvss" i|nto theE|
|00001030| 6e 76 73 6d 0d 65 6e 64 | 20 67 65 74 54 68 65 45 |nvsm.end| getTheE|
|00001040| 6e 76 73 0d 0d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |nvs..---|--------|
|00001050| 2d 2d 2d 2d 2d 2d 0d 2d | 2d 20 63 6c 6f 73 65 73 |------.-|- closes|
|00001060| 74 61 63 6b 20 68 61 6e | 64 6c 65 72 0d 2d 2d 2d |tack han|dler.---|
|00001070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 6f |--------|------.o|
|00001080| 6e 20 63 6c 6f 73 65 73 | 74 61 63 6b 0d 67 6c 6f |n closes|tack.glo|
|00001090| 62 61 6c 20 63 75 72 44 | 61 74 65 4c 69 73 74 2c |bal curD|ateList,|
|000010a0| 20 63 75 72 53 75 62 6a | 65 63 74 4c 69 73 74 2c | curSubj|ectList,|
|000010b0| 20 63 75 72 49 6e 64 65 | 78 4c 69 73 74 0d 70 75 | curInde|xList.pu|
|000010c0| 73 68 20 63 61 72 64 0d | 73 65 74 20 6c 6f 63 6b |sh card.|set lock|
|000010d0| 6d 65 73 73 61 67 65 73 | 20 74 6f 20 74 72 75 65 |messages| to true|
|000010e0| 0d 6c 6f 63 6b 20 73 63 | 72 65 65 6e 0d 70 75 74 |.lock sc|reen.put|
|000010f0| 20 65 6d 70 74 79 20 69 | 6e 74 6f 20 63 75 72 44 | empty i|nto curD|
|00001100| 61 74 65 4c 69 73 74 0d | 70 75 74 20 65 6d 70 74 |ateList.|put empt|
|00001110| 79 20 69 6e 74 6f 20 63 | 75 72 53 75 62 6a 65 63 |y into c|urSubjec|
|00001120| 74 4c 69 73 74 0d 70 75 | 74 20 65 6d 70 74 79 20 |tList.pu|t empty |
|00001130| 69 6e 74 6f 20 63 75 72 | 49 6e 64 65 78 4c 69 73 |into cur|IndexLis|
|00001140| 74 0d 2d 2d 0d 2d 2d 0d | 67 6f 20 63 61 72 64 20 |t.--.--.|go card |
|00001150| 22 4e 75 6d 62 65 72 4c | 69 73 74 69 6e 67 22 0d |"NumberL|isting".|
|00001160| 73 65 74 20 74 68 65 20 | 73 63 72 6f 6c 6c 20 6f |set the |scroll o|
|00001170| 66 20 63 61 72 64 20 66 | 69 65 6c 64 20 31 20 74 |f card f|ield 1 t|
|00001180| 6f 20 30 0d 70 75 74 20 | 65 6d 70 74 79 20 69 6e |o 0.put |empty in|
|00001190| 74 6f 20 62 6b 67 6e 64 | 20 66 69 65 6c 64 20 22 |to bkgnd| field "|
|000011a0| 73 75 62 6a 65 63 74 22 | 0d 70 75 74 20 65 6d 70 |subject"|.put emp|
|000011b0| 74 79 20 69 6e 74 6f 20 | 62 6b 67 6e 64 20 66 69 |ty into |bkgnd fi|
|000011c0| 65 6c 64 20 22 74 68 65 | 4c 69 73 74 22 0d 2d 2d |eld "the|List".--|
|000011d0| 0d 67 6f 20 63 61 72 64 | 20 22 44 61 74 65 4c 69 |.go card| "DateLi|
|000011e0| 73 74 69 6e 67 22 0d 69 | 66 20 74 68 65 20 73 74 |sting".i|f the st|
|000011f0| 79 6c 65 20 6f 66 20 63 | 64 20 66 6c 64 20 31 20 |yle of c|d fld 1 |
|00001200| 3d 20 22 73 63 72 6f 6c | 6c 69 6e 67 22 20 74 68 |= "scrol|ling" th|
|00001210| 65 6e 0d 73 65 74 20 74 | 68 65 20 73 63 72 6f 6c |en.set t|he scrol|
|00001220| 6c 20 6f 66 20 63 61 72 | 64 20 66 69 65 6c 64 20 |l of car|d field |
|00001230| 31 20 74 6f 20 30 0d 65 | 6e 64 20 69 66 0d 70 75 |1 to 0.e|nd if.pu|
|00001240| 74 20 65 6d 70 74 79 20 | 69 6e 74 6f 20 62 6b 67 |t empty |into bkg|
|00001250| 6e 64 20 66 69 65 6c 64 | 20 22 73 75 62 6a 65 63 |nd field| "subjec|
|00001260| 74 22 0d 70 75 74 20 65 | 6d 70 74 79 20 69 6e 74 |t".put e|mpty int|
|00001270| 6f 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 22 74 |o bkgnd |field "t|
|00001280| 68 65 4c 69 73 74 22 0d | 2d 2d 0d 67 6f 20 63 61 |heList".|--.go ca|
|00001290| 72 64 20 22 53 75 62 6a | 65 63 74 4c 69 73 74 69 |rd "Subj|ectListi|
|000012a0| 6e 67 22 0d 73 65 74 20 | 74 68 65 20 73 63 72 6f |ng".set |the scro|
|000012b0| 6c 6c 20 6f 66 20 63 61 | 72 64 20 66 69 65 6c 64 |ll of ca|rd field|
|000012c0| 20 31 20 74 6f 20 30 0d | 70 75 74 20 65 6d 70 74 | 1 to 0.|put empt|
|000012d0| 79 20 69 6e 74 6f 20 62 | 6b 67 6e 64 20 66 69 65 |y into b|kgnd fie|
|000012e0| 6c 64 20 22 73 75 62 6a | 65 63 74 22 0d 70 75 74 |ld "subj|ect".put|
|000012f0| 20 65 6d 70 74 79 20 69 | 6e 74 6f 20 62 6b 67 6e | empty i|nto bkgn|
|00001300| 64 20 66 69 65 6c 64 20 | 22 74 68 65 4c 69 73 74 |d field |"theList|
|00001310| 22 0d 2d 2d 0d 67 6f 20 | 63 61 72 64 20 22 49 6e |".--.go |card "In|
|00001320| 64 65 78 4c 69 73 74 69 | 6e 67 22 0d 73 65 74 20 |dexListi|ng".set |
|00001330| 74 68 65 20 73 63 72 6f | 6c 6c 20 6f 66 20 63 61 |the scro|ll of ca|
|00001340| 72 64 20 66 69 65 6c 64 | 20 31 20 74 6f 20 30 0d |rd field| 1 to 0.|
|00001350| 70 75 74 20 65 6d 70 74 | 79 20 69 6e 74 6f 20 62 |put empt|y into b|
|00001360| 6b 67 6e 64 20 66 69 65 | 6c 64 20 22 73 75 62 6a |kgnd fie|ld "subj|
|00001370| 65 63 74 22 0d 70 75 74 | 20 65 6d 70 74 79 20 69 |ect".put| empty i|
|00001380| 6e 74 6f 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 |nto bkgn|d field |
|00001390| 22 74 68 65 4c 69 73 74 | 22 0d 73 65 74 20 74 68 |"theList|".set th|
|000013a0| 65 20 74 6f 70 20 6f 66 | 20 63 61 72 64 20 62 74 |e top of| card bt|
|000013b0| 6e 20 32 20 74 6f 20 28 | 28 74 6f 70 20 6f 66 20 |n 2 to (|(top of |
|000013c0| 63 61 72 64 20 66 69 65 | 6c 64 20 32 29 20 2b 20 |card fie|ld 2) + |
|000013d0| 31 29 0d 2d 2d 0d 70 6f | 70 20 63 61 72 64 0d 2d |1).--.po|p card.-|
|000013e0| 2d 20 69 73 20 6f 70 65 | 6e 65 64 20 61 74 20 74 |- is ope|ned at t|
|000013f0| 68 65 20 73 61 6d 65 20 | 74 69 6d 65 3b 20 69 74 |he same |time; it|
|00001400| 20 6b 65 65 70 73 20 74 | 72 61 63 6b 20 6f 66 20 | keeps t|rack of |
|00001410| 77 68 69 63 68 20 69 6e | 64 65 78 20 74 68 65 20 |which in|dex the |
|00001420| 63 75 72 72 65 6e 74 5c | 0d 2d 2d 20 73 74 61 63 |current\|.-- stac|
|00001430| 6b 20 73 68 6f 75 6c 64 | 20 62 65 20 75 73 69 6e |k should| be usin|
|00001440| 67 20 61 6e 64 20 73 77 | 69 74 63 68 65 73 20 74 |g and sw|itches t|
|00001450| 6f 20 69 74 20 6f 6e 20 | 6f 70 65 6e 73 74 61 63 |o it on |openstac|
|00001460| 6b 20 6f 72 20 72 65 73 | 75 6d 65 73 74 61 63 6b |k or res|umestack|
|00001470| 0d 75 6e 6c 6f 63 6b 20 | 73 63 72 65 65 6e 0d 73 |.unlock |screen.s|
|00001480| 65 74 20 6c 6f 63 6b 6d | 65 73 73 61 67 65 73 20 |et lockm|essages |
|00001490| 74 6f 20 66 61 6c 73 65 | 0d 76 69 73 75 61 6c 20 |to false|.visual |
|000014a0| 65 66 66 65 63 74 20 69 | 72 69 73 20 63 6c 6f 73 |effect i|ris clos|
|000014b0| 65 0d 72 65 73 65 74 20 | 6d 65 6e 75 62 61 72 0d |e.reset |menubar.|
|000014c0| 65 6e 64 20 63 6c 6f 73 | 65 73 74 61 63 6b 0d 0d |end clos|estack..|
|000014d0| 6f 6e 20 73 75 73 70 65 | 6e 64 53 74 61 63 6b 0d |on suspe|ndStack.|
|000014e0| 2d 2d 20 6d 6f 64 69 66 | 69 65 64 20 70 6a 66 20 |-- modif|ied pjf |
|000014f0| 31 2f 37 2f 39 31 0d 67 | 65 74 20 75 73 65 72 6c |1/7/91.g|et userl|
|00001500| 65 76 65 6c 0d 69 66 20 | 69 74 20 69 73 20 32 20 |evel.if |it is 2 |
|00001510| 74 68 65 6e 20 73 65 74 | 20 75 73 65 72 6c 65 76 |then set| userlev|
|00001520| 65 6c 20 74 6f 20 31 0d | 2d 2d 20 65 6e 64 20 6d |el to 1.|-- end m|
|00001530| 6f 64 69 66 79 20 70 6a | 66 20 31 2f 37 2f 39 31 |odify pj|f 1/7/91|
|00001540| 0d 72 65 73 65 74 20 6d | 65 6e 75 62 61 72 0d 2d |.reset m|enubar.-|
|00001550| 2d 20 69 73 20 6f 70 65 | 6e 65 64 20 61 74 20 74 |- is ope|ned at t|
|00001560| 68 65 20 73 61 6d 65 20 | 74 69 6d 65 3b 20 69 74 |he same |time; it|
|00001570| 20 6b 65 65 70 73 20 74 | 72 61 63 6b 20 6f 66 20 | keeps t|rack of |
|00001580| 77 68 69 63 68 20 69 6e | 64 65 78 20 74 68 65 20 |which in|dex the |
|00001590| 63 75 72 72 65 6e 74 5c | 0d 2d 2d 20 73 74 61 63 |current\|.-- stac|
|000015a0| 6b 20 73 68 6f 75 6c 64 | 20 62 65 20 75 73 69 6e |k should| be usin|
|000015b0| 67 20 61 6e 64 20 73 77 | 69 74 63 68 65 73 20 74 |g and sw|itches t|
|000015c0| 6f 20 69 74 20 6f 6e 20 | 6f 70 65 6e 73 74 61 63 |o it on |openstac|
|000015d0| 6b 20 6f 72 20 72 65 73 | 75 6d 65 73 74 61 63 6b |k or res|umestack|
|000015e0| 0d 70 75 73 68 20 63 61 | 72 64 0d 65 6e 64 20 73 |.push ca|rd.end s|
|000015f0| 75 73 70 65 6e 64 53 74 | 61 63 6b 0d 0d 6f 6e 20 |uspendSt|ack..on |
|00001600| 72 65 73 75 6d 65 53 74 | 61 63 6b 0d 69 66 20 74 |resumeSt|ack.if t|
|00001610| 68 65 20 6f 70 74 69 6f | 6e 4b 65 79 20 69 73 20 |he optio|nKey is |
|00001620| 6e 6f 74 20 64 6f 77 6e | 20 74 68 65 6e 20 73 65 |not down| then se|
|00001630| 74 20 63 61 6e 74 4d 6f | 64 69 66 79 20 6f 66 20 |t cantMo|dify of |
|00001640| 74 68 69 73 20 73 74 61 | 63 6b 20 74 6f 20 74 72 |this sta|ck to tr|
|00001650| 75 65 0d 73 65 74 20 6c | 6f 63 6b 73 63 72 65 65 |ue.set l|ockscree|
|00001660| 6e 20 74 6f 20 74 72 75 | 65 0d 72 65 73 65 74 20 |n to tru|e.reset |
|00001670| 6d 65 6e 75 62 61 72 0d | 2d 2d 20 6e 65 65 64 20 |menubar.|-- need |
|00001680| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 6c 69 |the foll|owing li|
|00001690| 6e 65 20 74 6f 20 6d 61 | 6b 65 20 73 75 72 65 20 |ne to ma|ke sure |
|000016a0| 74 68 69 73 20 73 74 61 | 63 6b 20 61 6c 77 61 79 |this sta|ck alway|
|000016b0| 73 20 75 73 65 73 0d 6d | 61 6b 65 4d 65 6e 75 73 |s uses.m|akeMenus|
|000016c0| 0d 69 66 20 73 68 6f 72 | 74 20 6e 61 6d 65 20 6f |.if shor|t name o|
|000016d0| 66 20 74 68 69 73 20 62 | 67 20 69 73 20 22 6d 61 |f this b|g is "ma|
|000016e0| 69 6e 22 20 74 68 65 6e | 0d 73 65 6e 64 20 6f 70 |in" then|.send op|
|000016f0| 65 6e 62 61 63 6b 67 72 | 6f 75 6e 64 20 74 6f 20 |enbackgr|ound to |
|00001700| 62 67 20 22 6d 61 69 6e | 22 0d 73 65 6e 64 20 6f |bg "main|".send o|
|00001710| 70 65 6e 63 61 72 64 20 | 74 6f 20 62 67 22 6d 61 |pencard |to bg"ma|
|00001720| 69 6e 22 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 72 |in".end |if.end r|
|00001730| 65 73 75 6d 65 53 74 61 | 63 6b 0d 0d 2d 2d 2d 2d |esumeSta|ck..----|
|00001740| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2d 2d |--------|-----.--|
|00001750| 20 47 6f 42 61 63 6b 20 | 68 61 6e 64 6c 65 72 0d | GoBack |handler.|
|00001760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001770| 2d 0d 6f 6e 20 67 6f 42 | 61 63 6b 0d 67 6c 6f 62 |-.on goB|ack.glob|
|00001780| 61 6c 20 68 6f 6d 65 54 | 6f 0d 6c 6f 63 6b 20 73 |al homeT|o.lock s|
|00001790| 63 72 65 65 6e 0d 70 6f | 70 20 63 61 72 64 20 69 |creen.po|p card i|
|000017a0| 6e 74 6f 20 62 61 63 6b | 66 72 6f 6d 0d 69 66 20 |nto back|from.if |
|000017b0| 62 61 63 6b 66 72 6f 6d | 20 63 6f 6e 74 61 69 6e |backfrom| contain|
|000017c0| 73 20 22 48 6f 6d 65 22 | 20 74 68 65 6e 0d 61 6e |s "Home"| then.an|
|000017d0| 73 77 65 72 20 22 52 65 | 74 75 72 6e 20 74 6f 20 |swer "Re|turn to |
|000017e0| 48 6f 6d 65 20 53 74 61 | 63 6b 3f 22 20 77 69 74 |Home Sta|ck?" wit|
|000017f0| 68 20 22 4f 4b 22 20 6f | 72 20 22 43 61 6e 63 65 |h "OK" o|r "Cance|
|00001800| 6c 22 0d 69 66 20 69 74 | 20 69 73 20 22 4f 4b 22 |l".if it| is "OK"|
|00001810| 20 74 68 65 6e 0d 67 6f | 20 48 6f 6d 65 0d 65 78 | then.go| Home.ex|
|00001820| 69 74 20 67 6f 42 61 63 | 6b 0d 65 6c 73 65 0d 65 |it goBac|k.else.e|
|00001830| 78 69 74 20 67 6f 42 61 | 63 6b 0d 65 6e 64 20 69 |xit goBa|ck.end i|
|00001840| 66 0d 65 6c 73 65 0d 69 | 66 20 62 61 63 6b 66 72 |f.else.i|f backfr|
|00001850| 6f 6d 20 ad 20 74 68 65 | 20 6c 6f 6e 67 20 69 64 |om . the| long id|
|00001860| 20 6f 66 20 74 68 69 73 | 20 63 61 72 64 20 74 68 | of this| card th|
|00001870| 65 6e 0d 69 66 20 62 61 | 63 6b 66 72 6f 6d 20 63 |en.if ba|ckfrom c|
|00001880| 6f 6e 74 61 69 6e 73 20 | 74 68 65 20 73 68 6f 72 |ontains |the shor|
|00001890| 74 20 6e 61 6d 65 20 6f | 66 20 74 68 69 73 20 73 |t name o|f this s|
|000018a0| 74 61 63 6b 20 74 68 65 | 6e 0d 67 6f 20 62 61 63 |tack the|n.go bac|
|000018b0| 6b 66 72 6f 6d 0d 75 6e | 6c 6f 63 6b 20 73 63 72 |kfrom.un|lock scr|
|000018c0| 65 65 6e 20 77 69 74 68 | 20 76 69 73 75 61 6c 20 |een with| visual |
|000018d0| 65 66 66 65 63 74 20 7a | 6f 6f 6d 20 6f 75 74 0d |effect z|oom out.|
|000018e0| 65 78 69 74 20 67 6f 42 | 61 63 6b 0d 65 6c 73 65 |exit goB|ack.else|
|000018f0| 20 20 2d 2d 20 66 72 6f | 6d 20 61 20 64 69 66 66 |  -- fro|m a diff|
|00001900| 65 72 65 6e 74 20 73 74 | 61 63 6b 0d 69 66 20 6c |erent st|ack.if l|
|00001910| 69 6e 65 20 31 20 6f 66 | 20 68 6f 6d 65 54 6f 20 |ine 1 of| homeTo |
|00001920| 3d 20 62 61 63 6b 66 72 | 6f 6d 20 74 68 65 6e 0d |= backfr|om then.|
|00001930| 70 75 73 68 20 63 61 72 | 64 20 2d 2d 20 64 75 6d |push car|d -- dum|
|00001940| 6d 79 2c 20 67 65 74 73 | 20 70 6f 70 70 65 64 20 |my, gets| popped |
|00001950| 6f 6e 20 63 6c 6f 73 65 | 20 63 61 72 64 0d 64 65 |on close| card.de|
|00001960| 6c 65 74 65 20 6c 69 6e | 65 20 31 20 6f 66 20 68 |lete lin|e 1 of h|
|00001970| 6f 6d 65 54 6f 0d 67 6f | 20 62 61 63 6b 66 72 6f |omeTo.go| backfro|
|00001980| 6d 0d 6f 70 65 6e 62 61 | 63 6b 67 72 6f 75 6e 64 |m.openba|ckground|
|00001990| 0d 6f 70 65 6e 63 61 72 | 64 0d 75 6e 6c 6f 63 6b |.opencar|d.unlock|
|000019a0| 20 73 63 72 65 65 6e 20 | 77 69 74 68 20 76 69 73 | screen |with vis|
|000019b0| 75 61 6c 20 65 66 66 65 | 63 74 20 7a 6f 6f 6d 20 |ual effe|ct zoom |
|000019c0| 6f 75 74 0d 65 78 69 74 | 20 67 6f 42 61 63 6b 0d |out.exit| goBack.|
|000019d0| 65 6c 73 65 20 20 2d 2d | 20 73 6f 72 72 79 2c 20 |else  --| sorry, |
|000019e0| 6f 6e 6c 79 20 67 6f 20 | 62 61 63 6b 20 69 66 20 |only go |back if |
|000019f0| 68 6f 6d 65 74 6f 20 69 | 73 20 74 68 65 20 73 61 |hometo i|s the sa|
|00001a00| 6d 65 0d 67 6f 42 61 63 | 6b 0d 65 78 69 74 20 67 |me.goBac|k.exit g|
|00001a10| 6f 42 61 63 6b 0d 65 6e | 64 20 69 66 20 20 2d 2d |oBack.en|d if  --|
|00001a20| 20 68 6f 6d 65 74 6f 20 | 3d 20 67 6f 62 61 63 6b | hometo |= goback|
|00001a30| 0d 65 6e 64 20 69 66 20 | 20 2d 2d 20 66 72 6f 6d |.end if | -- from|
|00001a40| 20 74 68 69 73 20 73 74 | 61 63 6b 0d 65 6c 73 65 | this st|ack.else|
|00001a50| 20 2d 2d 20 62 61 63 6b | 46 72 6f 6d 20 69 73 20 | -- back|From is |
|00001a60| 74 68 65 20 63 75 72 72 | 65 6e 74 20 63 61 72 64 |the curr|ent card|
|00001a70| 0d 67 6f 42 61 63 6b 0d | 65 78 69 74 20 67 6f 42 |.goBack.|exit goB|
|00001a80| 61 63 6b 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 69 |ack.end |if.end i|
|00001a90| 66 0d 65 6e 64 20 67 6f | 42 61 63 6b 0d 0d 2d 2d |f.end go|Back..--|
|00001aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001ab0| 2d 2d 20 67 6f 50 72 69 | 6e 74 49 74 20 68 61 6e |-- goPri|ntIt han|
|00001ac0| 64 6c 65 72 0d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |dler.---|--------|
|00001ad0| 2d 2d 2d 2d 2d 2d 0d 2d | 2d 0d 6f 6e 20 67 6f 50 |------.-|-.on goP|
|00001ae0| 72 69 6e 74 49 74 0d 73 | 65 74 20 63 75 72 73 6f |rintIt.s|et curso|
|00001af0| 72 20 74 6f 20 62 75 73 | 79 0d 2d 2d 20 69 66 20 |r to bus|y.-- if |
|00001b00| 6f 70 74 69 6f 6e 6b 65 | 79 20 74 68 65 6e 20 70 |optionke|y then p|
|00001b10| 72 69 6e 74 20 74 68 65 | 20 65 6e 74 69 72 65 20 |rint the| entire |
|00001b20| 73 74 61 63 6b 0d 69 66 | 20 74 68 65 20 6f 70 74 |stack.if| the opt|
|00001b30| 69 6f 6e 6b 65 79 20 69 | 73 20 22 64 6f 77 6e 22 |ionkey i|s "down"|
|00001b40| 20 74 68 65 6e 0d 61 6e | 73 77 65 72 20 22 50 72 | then.an|swer "Pr|
|00001b50| 69 6e 74 20 74 68 65 20 | 65 6e 74 69 72 65 20 54 |int the |entire T|
|00001b60| 65 63 68 6e 69 63 61 6c | 20 4e 6f 74 65 73 20 53 |echnical| Notes S|
|00001b70| 74 61 63 6b 3f 22 c2 0d | 77 69 74 68 20 22 4f 4b |tack?"..|with "OK|
|00001b80| 22 20 6f 72 20 22 43 61 | 6e 63 65 6c 22 0d 69 66 |" or "Ca|ncel".if|
|00001b90| 20 69 74 20 3d 20 22 43 | 61 6e 63 65 6c 22 20 74 | it = "C|ancel" t|
|00001ba0| 68 65 6e 0d 65 78 69 74 | 20 67 6f 50 72 69 6e 74 |hen.exit| goPrint|
|00001bb0| 49 74 0d 65 6c 73 65 0d | 2d 2d 20 70 72 6f 63 65 |It.else.|-- proce|
|00001bc0| 73 73 20 61 6e 64 20 70 | 72 69 6e 74 20 74 68 65 |ss and p|rint the|
|00001bd0| 20 65 6e 74 69 72 65 20 | 73 74 61 63 6b 0d 70 75 | entire |stack.pu|
|00001be0| 73 68 20 63 61 72 64 0d | 67 6f 20 66 69 72 73 74 |sh card.|go first|
|00001bf0| 20 63 61 72 64 20 6f 66 | 20 62 67 20 22 4d 61 69 | card of| bg "Mai|
|00001c00| 6e 22 0d 72 65 70 65 61 | 74 20 75 6e 74 69 6c 20 |n".repea|t until |
|00001c10| 62 67 20 66 6c 64 20 22 | 6e 75 6d 62 65 72 22 20 |bg fld "|number" |
|00001c20| 6f 66 20 6c 61 73 74 20 | 63 61 72 64 20 69 73 20 |of last |card is |
|00001c30| 69 6e 20 62 67 20 66 6c | 64 20 22 6e 75 6d 62 65 |in bg fl|d "numbe|
|00001c40| 72 22 20 6f 66 20 70 72 | 65 76 20 63 61 72 64 0d |r" of pr|ev card.|
|00001c50| 69 66 20 70 72 69 6e 74 | 49 74 28 29 20 69 73 20 |if print|It() is |
|00001c60| 6e 6f 74 20 65 6d 70 74 | 79 20 74 68 65 6e 20 65 |not empt|y then e|
|00001c70| 78 69 74 20 72 65 70 65 | 61 74 0d 67 6f 20 6e 65 |xit repe|at.go ne|
|00001c80| 78 74 20 63 61 72 64 0d | 65 6e 64 20 72 65 70 65 |xt card.|end repe|
|00001c90| 61 74 0d 70 6f 70 20 63 | 61 72 64 0d 65 6e 64 20 |at.pop c|ard.end |
|00001ca0| 69 66 0d 2d 2d 0d 65 6c | 73 65 0d 69 66 20 74 68 |if.--.el|se.if th|
|00001cb0| 65 20 73 68 6f 72 74 20 | 6e 61 6d 65 20 6f 66 20 |e short |name of |
|00001cc0| 74 68 69 73 20 62 67 20 | 69 73 20 22 4d 61 69 6e |this bg |is "Main|
|00001cd0| 22 20 74 68 65 6e 0d 70 | 75 74 20 62 6b 67 6e 64 |" then.p|ut bkgnd|
|00001ce0| 20 66 69 65 6c 64 20 22 | 6e 75 6d 62 65 72 22 20 | field "|number" |
|00001cf0| 69 6e 74 6f 20 70 72 65 | 4e 75 6d 0d 2d 2d 0d 69 |into pre|Num.--.i|
|00001d00| 66 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |f the nu|mber of |
|00001d10| 63 68 61 72 73 20 69 6e | 20 70 72 65 4e 75 6d 20 |chars in| preNum |
|00001d20| 3e 20 33 20 74 68 65 6e | 0d 61 6e 73 77 65 72 20 |> 3 then|.answer |
|00001d30| 22 50 72 69 6e 74 20 74 | 65 78 74 20 66 72 6f 6d |"Print t|ext from|
|00001d40| 20 74 68 69 73 20 63 61 | 72 64 20 6f 72 20 65 6e | this ca|rd or en|
|00001d50| 74 69 72 65 20 4e 6f 74 | 65 3f 22 c2 0d 77 69 74 |tire Not|e?"..wit|
|00001d60| 68 20 22 43 61 72 64 22 | 20 6f 72 20 22 4e 6f 74 |h "Card"| or "Not|
|00001d70| 65 22 20 6f 72 20 22 43 | 61 6e 63 65 6c 22 0d 69 |e" or "C|ancel".i|
|00001d80| 66 20 69 74 20 3d 20 22 | 43 61 6e 63 65 6c 22 20 |f it = "|Cancel" |
|00001d90| 74 68 65 6e 0d 65 78 69 | 74 20 67 6f 50 72 69 6e |then.exi|t goPrin|
|00001da0| 74 49 74 0d 65 6c 73 65 | 0d 69 66 20 69 74 20 3d |tIt.else|.if it =|
|00001db0| 20 22 43 61 72 64 22 20 | 74 68 65 6e 0d 67 65 74 | "Card" |then.get|
|00001dc0| 20 70 72 69 6e 74 49 74 | 28 29 20 2d 2d 20 70 72 | printIt|() -- pr|
|00001dd0| 69 6e 74 20 6a 75 73 74 | 20 74 68 65 20 63 61 72 |int just| the car|
|00001de0| 64 0d 65 6c 73 65 0d 69 | 66 20 69 74 20 3d 20 22 |d.else.i|f it = "|
|00001df0| 4e 6f 74 65 22 20 74 68 | 65 6e 0d 70 75 73 68 20 |Note" th|en.push |
|00001e00| 63 61 72 64 0d 64 65 6c | 65 74 65 20 63 68 61 72 |card.del|ete char|
|00001e10| 20 34 20 6f 66 20 70 72 | 65 4e 75 6d 0d 72 65 70 | 4 of pr|eNum.rep|
|00001e20| 65 61 74 20 75 6e 74 69 | 6c 20 70 72 65 4e 75 6d |eat unti|l preNum|
|00001e30| 20 69 73 20 6e 6f 74 20 | 69 6e 20 62 6b 67 6e 64 | is not |in bkgnd|
|00001e40| 20 66 69 65 6c 64 20 22 | 6e 75 6d 62 65 72 22 20 | field "|number" |
|00001e50| 6f 66 20 70 72 65 76 20 | 63 61 72 64 0d 67 6f 20 |of prev |card.go |
|00001e60| 70 72 65 76 20 63 61 72 | 64 0d 65 6e 64 20 72 65 |prev car|d.end re|
|00001e70| 70 65 61 74 0d 72 65 70 | 65 61 74 20 75 6e 74 69 |peat.rep|eat unti|
|00001e80| 6c 20 70 72 65 4e 75 6d | 20 69 73 20 6e 6f 74 20 |l preNum| is not |
|00001e90| 69 6e 20 62 6b 67 6e 64 | 20 66 69 65 6c 64 20 22 |in bkgnd| field "|
|00001ea0| 6e 75 6d 62 65 72 22 0d | 69 66 20 70 72 69 6e 74 |number".|if print|
|00001eb0| 49 74 28 29 20 69 73 20 | 6e 6f 74 20 65 6d 70 74 |It() is |not empt|
|00001ec0| 79 20 74 68 65 6e 20 65 | 78 69 74 20 72 65 70 65 |y then e|xit repe|
|00001ed0| 61 74 0d 67 6f 20 6e 65 | 78 74 20 63 61 72 64 0d |at.go ne|xt card.|
|00001ee0| 65 6e 64 20 72 65 70 65 | 61 74 0d 70 6f 70 20 63 |end repe|at.pop c|
|00001ef0| 61 72 64 0d 65 6e 64 20 | 69 66 20 2d 2d 20 4e 6f |ard.end |if -- No|
|00001f00| 74 65 0d 65 6e 64 20 69 | 66 20 2d 2d 20 43 61 72 |te.end i|f -- Car|
|00001f10| 64 0d 65 6e 64 20 69 66 | 20 2d 2d 20 43 61 6e 63 |d.end if| -- Canc|
|00001f20| 65 6c 0d 65 6c 73 65 20 | 2d 2d 20 50 72 69 6e 74 |el.else |-- Print|
|00001f30| 20 6f 72 20 63 61 6e 63 | 65 6c 20 66 72 6f 6d 20 | or canc|el from |
|00001f40| 73 69 6e 67 6c 65 20 63 | 61 72 64 0d 61 6e 73 77 |single c|ard.answ|
|00001f50| 65 72 20 22 50 72 69 6e | 74 20 74 65 78 74 20 66 |er "Prin|t text f|
|00001f60| 72 6f 6d 20 74 68 69 73 | 20 63 61 72 64 3f 22 c2 |rom this| card?".|
|00001f70| 0d 77 69 74 68 20 22 4f | 4b 22 20 6f 72 20 22 43 |.with "O|K" or "C|
|00001f80| 61 6e 63 65 6c 22 0d 69 | 66 20 69 74 20 3d 20 22 |ancel".i|f it = "|
|00001f90| 43 61 6e 63 65 6c 22 20 | 74 68 65 6e 0d 65 78 69 |Cancel" |then.exi|
|00001fa0| 74 20 67 6f 50 72 69 6e | 74 49 74 0d 65 6c 73 65 |t goPrin|tIt.else|
|00001fb0| 0d 67 65 74 20 70 72 69 | 6e 74 49 74 28 29 20 2d |.get pri|ntIt() -|
|00001fc0| 2d 20 70 72 69 6e 74 20 | 6a 75 73 74 20 74 68 65 |- print |just the|
|00001fd0| 20 63 61 72 64 0d 65 6e | 64 20 69 66 20 2d 2d 20 | card.en|d if -- |
|00001fe0| 50 72 69 6e 74 20 6f 72 | 20 63 61 6e 63 65 6c 0d |Print or| cancel.|
|00001ff0| 65 6e 64 20 69 66 20 2d | 2d 20 4d 75 6c 74 69 70 |end if -|- Multip|
|00002000| 6c 65 2d 43 61 72 64 20 | 4e 6f 74 65 0d 65 6c 73 |le-Card |Note.els|
|00002010| 65 20 2d 2d 20 4e 6f 74 | 20 4d 61 69 6e 20 62 67 |e -- Not| Main bg|
|00002020| 2c 20 73 6f 20 6e 6f 20 | 63 68 65 63 6b 20 6e 65 |, so no |check ne|
|00002030| 63 65 73 73 61 72 79 0d | 67 65 74 20 70 72 69 6e |cessary.|get prin|
|00002040| 74 49 74 28 29 0d 65 6e | 64 20 69 66 20 2d 2d 20 |tIt().en|d if -- |
|00002050| 57 68 69 63 68 20 62 67 | 3f 0d 65 6e 64 20 69 66 |Which bg|?.end if|
|00002060| 20 2d 2d 20 4f 70 74 69 | 6f 6e 20 6b 65 79 3f 0d | -- Opti|on key?.|
|00002070| 65 6e 64 20 67 6f 50 72 | 69 6e 74 49 74 0d 0d 2d |end goPr|intIt..-|
|00002080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002090| 0d 2d 2d 20 4d 6f 6f 66 | 43 75 72 73 6f 72 20 68 |.-- Moof|Cursor h|
|000020a0| 61 6e 64 6c 65 72 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |andler.-|--------|
|000020b0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 6f 6e 20 4d 6f 6f 66 |--------|.on Moof|
|000020c0| 43 75 72 73 6f 72 20 68 | 6f 77 6c 6f 6e 67 0d 69 |Cursor h|owlong.i|
|000020d0| 66 20 68 6f 77 6c 6f 6e | 67 20 69 73 20 65 6d 70 |f howlon|g is emp|
|000020e0| 74 79 20 74 68 65 6e 0d | 70 75 74 20 31 20 69 6e |ty then.|put 1 in|
|000020f0| 74 6f 20 68 6f 77 6c 6f | 6e 67 0d 65 6c 73 65 0d |to howlo|ng.else.|
|00002100| 65 6e 64 20 69 66 0d 70 | 75 74 20 68 6f 77 6c 6f |end if.p|ut howlo|
|00002110| 6e 67 20 69 6e 74 6f 20 | 64 65 6c 61 79 0d 73 65 |ng into |delay.se|
|00002120| 74 20 63 75 72 73 6f 72 | 20 74 6f 20 22 64 6f 67 |t cursor| to "dog|
|00002130| 63 6f 77 32 22 0d 77 61 | 69 74 20 64 65 6c 61 79 |cow2".wa|it delay|
|00002140| 0d 73 65 74 20 63 75 72 | 73 6f 72 20 74 6f 20 22 |.set cur|sor to "|
|00002150| 64 6f 67 63 6f 77 33 22 | 0d 77 61 69 74 20 64 65 |dogcow3"|.wait de|
|00002160| 6c 61 79 0d 73 65 74 20 | 63 75 72 73 6f 72 20 74 |lay.set |cursor t|
|00002170| 6f 20 22 64 6f 67 63 6f | 77 34 22 0d 77 61 69 74 |o "dogco|w4".wait|
|00002180| 20 64 65 6c 61 79 0d 73 | 65 74 20 63 75 72 73 6f | delay.s|et curso|
|00002190| 72 20 74 6f 20 22 64 6f | 67 63 6f 77 35 22 0d 77 |r to "do|gcow5".w|
|000021a0| 61 69 74 20 64 65 6c 61 | 79 0d 73 65 74 20 63 75 |ait dela|y.set cu|
|000021b0| 72 73 6f 72 20 74 6f 20 | 22 64 6f 67 63 6f 77 36 |rsor to |"dogcow6|
|000021c0| 22 0d 77 61 69 74 20 64 | 65 6c 61 79 0d 73 65 74 |".wait d|elay.set|
|000021d0| 20 63 75 72 73 6f 72 20 | 74 6f 20 22 64 6f 67 63 | cursor |to "dogc|
|000021e0| 6f 77 37 22 0d 77 61 69 | 74 20 64 65 6c 61 79 0d |ow7".wai|t delay.|
|000021f0| 73 65 74 20 63 75 72 73 | 6f 72 20 74 6f 20 22 64 |set curs|or to "d|
|00002200| 6f 67 63 6f 77 38 22 0d | 77 61 69 74 20 64 65 6c |ogcow8".|wait del|
|00002210| 61 79 0d 73 65 74 20 63 | 75 72 73 6f 72 20 74 6f |ay.set c|ursor to|
|00002220| 20 22 64 6f 67 63 6f 77 | 31 22 0d 77 61 69 74 20 | "dogcow|1".wait |
|00002230| 64 65 6c 61 79 0d 65 6e | 64 20 4d 6f 6f 66 43 75 |delay.en|d MoofCu|
|00002240| 72 73 6f 72 0d 0d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |rsor..--|--------|
|00002250| 2d 2d 2d 2d 2d 2d 2d 0d | 2d 2d 20 67 6f 53 61 76 |-------.|-- goSav|
|00002260| 65 49 74 20 68 61 6e 64 | 6c 65 72 0d 2d 2d 2d 2d |eIt hand|ler.----|
|00002270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 6f 6e |--------|-----.on|
|00002280| 20 67 6f 53 61 76 65 49 | 74 0d 2d 2d 20 64 65 74 | goSaveI|t.-- det|
|00002290| 65 72 6d 69 6e 65 20 66 | 69 6c 65 6e 61 6d 65 20 |ermine f|ilename |
|000022a0| 66 72 6f 6d 20 63 61 72 | 64 0d 2d 2d 20 69 66 20 |from car|d.-- if |
|000022b0| 6e 6f 74 20 4d 61 69 6e | 20 62 67 2c 20 73 74 75 |not Main| bg, stu|
|000022c0| 66 66 20 73 61 76 65 20 | 63 6f 6e 74 65 6e 74 73 |ff save |contents|
|000022d0| 20 69 6e 74 6f 20 73 61 | 76 65 54 68 69 73 0d 2d | into sa|veThis.-|
|000022e0| 2d 0d 69 66 20 74 68 65 | 20 73 68 6f 72 74 20 6e |-.if the| short n|
|000022f0| 61 6d 65 20 6f 66 20 74 | 68 69 73 20 62 67 20 69 |ame of t|his bg i|
|00002300| 73 20 22 4f 70 65 6e 69 | 6e 67 20 43 61 72 64 73 |s "Openi|ng Cards|
|00002310| 22 20 74 68 65 6e 0d 65 | 78 69 74 20 67 6f 53 61 |" then.e|xit goSa|
|00002320| 76 65 49 74 0d 65 6c 73 | 65 0d 69 66 20 74 68 65 |veIt.els|e.if the|
|00002330| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|00002340| 68 69 73 20 62 67 20 69 | 73 20 22 43 6f 6e 74 72 |his bg i|s "Contr|
|00002350| 6f 6c 22 20 74 68 65 6e | 0d 69 66 20 74 68 65 20 |ol" then|.if the |
|00002360| 73 68 6f 72 74 20 6e 61 | 6d 65 20 6f 66 20 74 68 |short na|me of th|
|00002370| 69 73 20 63 64 20 69 73 | 20 22 4e 75 6d 62 65 72 |is cd is| "Number|
|00002380| 4c 69 73 74 69 6e 67 22 | 20 74 68 65 6e 0d 70 75 |Listing"| then.pu|
|00002390| 74 20 22 54 65 63 68 6e | 69 63 61 6c 20 4e 6f 74 |t "Techn|ical Not|
|000023a0| 65 73 20 4c 69 73 74 69 | 6e 67 22 20 69 6e 74 6f |es Listi|ng" into|
|000023b0| 20 66 69 6c 65 4e 61 6d | 65 0d 70 75 74 20 62 67 | fileNam|e.put bg|
|000023c0| 20 66 6c 64 20 33 20 26 | 20 72 65 74 75 72 6e 20 | fld 3 &| return |
|000023d0| 26 20 63 64 20 66 6c 64 | 20 22 54 4f 43 22 20 69 |& cd fld| "TOC" i|
|000023e0| 6e 74 6f 20 73 61 76 65 | 54 68 69 73 0d 65 6c 73 |nto save|This.els|
|000023f0| 65 0d 69 66 20 62 67 20 | 66 6c 64 20 22 74 68 65 |e.if bg |fld "the|
|00002400| 4c 69 73 74 22 20 69 73 | 20 65 6d 70 74 79 20 74 |List" is| empty t|
|00002410| 68 65 6e 0d 65 78 69 74 | 20 67 6f 53 61 76 65 49 |hen.exit| goSaveI|
|00002420| 74 20 2d 2d 20 61 6c 6c | 20 6f 74 68 65 72 20 63 |t -- all| other c|
|00002430| 61 72 64 73 20 6f 66 20 | 43 6f 6e 74 72 6f 6c 20 |ards of |Control |
|00002440| 68 61 76 65 20 74 68 65 | 4c 69 73 74 0d 65 6c 73 |have the|List.els|
|00002450| 65 0d 70 75 74 20 22 54 | 65 63 68 6e 69 63 61 6c |e.put "T|echnical|
|00002460| 20 4e 6f 74 65 73 20 22 | 20 26 20 62 67 20 66 6c | Notes "| & bg fl|
|00002470| 64 20 22 73 75 62 6a 65 | 63 74 22 20 69 6e 74 6f |d "subje|ct" into|
|00002480| 20 66 69 6c 65 4e 61 6d | 65 0d 70 75 74 20 62 67 | fileNam|e.put bg|
|00002490| 20 66 6c 64 20 33 20 26 | 20 72 65 74 75 72 6e c2 | fld 3 &| return.|
|000024a0| 0d 26 20 62 67 20 66 6c | 64 20 22 73 75 62 6a 65 |.& bg fl|d "subje|
|000024b0| 63 74 22 20 26 20 72 65 | 74 75 72 6e c2 0d 26 20 |ct" & re|turn..& |
|000024c0| 62 67 20 66 6c 64 20 22 | 74 68 65 4c 69 73 74 22 |bg fld "|theList"|
|000024d0| 20 69 6e 74 6f 20 73 61 | 76 65 54 68 69 73 0d 65 | into sa|veThis.e|
|000024e0| 6e 64 20 69 66 20 2d 2d | 20 74 68 65 4c 69 73 74 |nd if --| theList|
|000024f0| 20 65 6d 70 74 79 3f 0d | 65 6e 64 20 69 66 20 2d | empty?.|end if -|
|00002500| 2d 20 4e 75 6d 62 65 72 | 4c 69 73 74 69 6e 67 3f |- Number|Listing?|
|00002510| 0d 65 6c 73 65 20 2d 2d | 20 68 61 73 20 74 6f 20 |.else --| has to |
|00002520| 62 65 20 4d 61 69 6e 20 | 62 67 2c 20 6a 75 73 74 |be Main |bg, just|
|00002530| 20 67 65 74 20 66 69 6c | 65 6e 61 6d 65 0d 69 66 | get fil|ename.if|
|00002540| 20 62 67 20 66 6c 64 20 | 22 54 65 78 74 22 20 69 | bg fld |"Text" i|
|00002550| 73 20 65 6d 70 74 79 20 | 74 68 65 6e 0d 65 78 69 |s empty |then.exi|
|00002560| 74 20 67 6f 53 61 76 65 | 49 74 0d 65 6c 73 65 0d |t goSave|It.else.|
|00002570| 70 75 74 20 62 67 20 66 | 6c 64 20 22 54 69 74 6c |put bg f|ld "Titl|
|00002580| 65 22 20 69 6e 74 6f 20 | 66 69 6c 65 4e 61 6d 65 |e" into |fileName|
|00002590| 0d 65 6e 64 20 69 66 20 | 2d 2d 20 54 65 78 74 20 |.end if |-- Text |
|000025a0| 65 6d 70 74 79 3f 0d 65 | 6e 64 20 69 66 20 2d 2d |empty?.e|nd if --|
|000025b0| 20 45 6e 64 20 6f 66 20 | 43 6f 6e 74 72 6f 6c 20 | End of |Control |
|000025c0| 62 67 0d 65 6e 64 20 69 | 66 20 2d 2d 20 45 6e 64 |bg.end i|f -- End|
|000025d0| 20 6f 66 20 4f 70 65 6e | 69 6e 67 20 62 67 0d 2d | of Open|ing bg.-|
|000025e0| 2d 0d 2d 2d 20 70 72 6f | 63 65 73 73 20 66 69 6c |-.-- pro|cess fil|
|000025f0| 65 6e 61 6d 65 73 20 66 | 6f 72 20 61 6e 79 20 62 |enames f|or any b|
|00002600| 61 63 6b 67 72 6f 75 6e | 64 0d 2d 2d 0d 70 75 74 |ackgroun|d.--.put|
|00002610| 20 6c 65 6e 67 74 68 28 | 66 69 6c 65 4e 61 6d 65 | length(|fileName|
|00002620| 29 20 69 6e 74 6f 20 66 | 6c 65 6e 67 74 68 0d 69 |) into f|length.i|
|00002630| 66 20 66 6c 65 6e 67 74 | 68 20 3e 20 33 30 20 74 |f flengt|h > 30 t|
|00002640| 68 65 6e 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |hen.repe|at until|
|00002650| 20 6c 65 6e 67 74 68 28 | 66 69 6c 65 4e 61 6d 65 | length(|fileName|
|00002660| 29 20 3c 20 33 31 0d 64 | 65 6c 65 74 65 20 6c 61 |) < 31.d|elete la|
|00002670| 73 74 20 77 6f 72 64 20 | 6f 66 20 66 69 6c 65 4e |st word |of fileN|
|00002680| 61 6d 65 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 65 |ame.end |repeat.e|
|00002690| 6e 64 20 69 66 0d 67 65 | 74 20 73 66 70 75 74 66 |nd if.ge|t sfputf|
|000026a0| 69 6c 65 28 66 69 6c 65 | 4e 61 6d 65 29 0d 69 66 |ile(file|Name).if|
|000026b0| 20 69 74 20 69 73 20 65 | 6d 70 74 79 20 74 68 65 | it is e|mpty the|
|000026c0| 6e 20 65 78 69 74 20 67 | 6f 53 61 76 65 49 74 0d |n exit g|oSaveIt.|
|000026d0| 73 65 74 20 63 75 72 73 | 6f 72 20 74 6f 20 62 75 |set curs|or to bu|
|000026e0| 73 79 0d 70 75 74 20 69 | 74 20 69 6e 74 6f 20 66 |sy.put i|t into f|
|000026f0| 69 6c 65 4e 61 6d 65 0d | 2d 2d 0d 2d 2d 20 6e 6f |ileName.|--.-- no|
|00002700| 77 20 74 68 61 74 20 77 | 65 20 68 61 76 65 20 74 |w that w|e have t|
|00002710| 68 65 20 66 69 6c 65 6e | 61 6d 65 2c 20 65 69 74 |he filen|ame, eit|
|00002720| 68 65 72 20 73 61 76 65 | 20 69 74 20 6f 72 20 70 |her save| it or p|
|00002730| 72 6f 63 65 73 73 20 4d | 61 69 6e 0d 2d 2d 0d 6f |rocess M|ain.--.o|
|00002740| 70 65 6e 20 66 69 6c 65 | 20 66 69 6c 65 4e 61 6d |pen file| fileNam|
|00002750| 65 0d 69 66 20 74 68 65 | 20 73 68 6f 72 74 20 6e |e.if the| short n|
|00002760| 61 6d 65 20 6f 66 20 74 | 68 69 73 20 62 67 20 ad |ame of t|his bg .|
|00002770| 20 22 4d 61 69 6e 22 20 | 74 68 65 6e 0d 77 72 69 | "Main" |then.wri|
|00002780| 74 65 20 73 61 76 65 54 | 68 69 73 20 74 6f 20 66 |te saveT|his to f|
|00002790| 69 6c 65 20 66 69 6c 65 | 4e 61 6d 65 0d 65 6c 73 |ile file|Name.els|
|000027a0| 65 0d 2d 2d 20 4d 61 69 | 6e 20 62 61 63 6b 67 72 |e.-- Mai|n backgr|
|000027b0| 6f 75 6e 64 2e 20 20 63 | 68 65 63 6b 20 66 6f 72 |ound.  c|heck for|
|000027c0| 20 6d 75 6c 74 69 70 6c | 65 20 63 61 72 64 73 20 | multipl|e cards |
|000027d0| 61 6e 64 20 70 72 6f 63 | 65 73 73 0d 2d 2d 20 61 |and proc|ess.-- a|
|000027e0| 73 20 6e 65 63 65 73 73 | 61 72 79 20 74 6f 20 73 |s necess|ary to s|
|000027f0| 61 76 65 20 61 20 73 69 | 6e 67 6c 65 20 66 69 6c |ave a si|ngle fil|
|00002800| 65 20 69 6e 20 6c 69 6d | 69 74 65 64 20 6d 65 6d |e in lim|ited mem|
|00002810| 6f 72 79 0d 70 75 74 20 | 62 6b 67 6e 64 20 66 69 |ory.put |bkgnd fi|
|00002820| 65 6c 64 20 22 6e 75 6d | 62 65 72 22 20 69 6e 74 |eld "num|ber" int|
|00002830| 6f 20 70 72 65 4e 75 6d | 0d 69 66 20 74 68 65 20 |o preNum|.if the |
|00002840| 6e 75 6d 62 65 72 20 6f | 66 20 63 68 61 72 73 20 |number o|f chars |
|00002850| 69 6e 20 70 72 65 4e 75 | 6d 20 3e 20 33 20 74 68 |in preNu|m > 3 th|
|00002860| 65 6e 0d 6c 6f 63 6b 20 | 73 63 72 65 65 6e 0d 70 |en.lock |screen.p|
|00002870| 75 73 68 20 63 61 72 64 | 0d 64 65 6c 65 74 65 20 |ush card|.delete |
|00002880| 63 68 61 72 20 34 20 6f | 66 20 70 72 65 4e 75 6d |char 4 o|f preNum|
|00002890| 0d 72 65 70 65 61 74 20 | 75 6e 74 69 6c 20 70 72 |.repeat |until pr|
|000028a0| 65 4e 75 6d 20 69 73 20 | 6e 6f 74 20 69 6e 20 62 |eNum is |not in b|
|000028b0| 67 20 66 6c 64 20 22 6e | 75 6d 62 65 72 22 20 6f |g fld "n|umber" o|
|000028c0| 66 20 70 72 65 76 20 63 | 61 72 64 0d 67 6f 20 70 |f prev c|ard.go p|
|000028d0| 72 65 76 20 63 61 72 64 | 0d 65 6e 64 20 72 65 70 |rev card|.end rep|
|000028e0| 65 61 74 0d 75 6e 6c 6f | 63 6b 20 73 63 72 65 65 |eat.unlo|ck scree|
|000028f0| 6e 0d 70 75 74 20 22 74 | 72 75 65 22 20 69 6e 74 |n.put "t|rue" int|
|00002900| 6f 20 66 69 72 73 74 43 | 61 72 64 20 2d 2d 20 66 |o firstC|ard -- f|
|00002910| 69 72 73 74 20 63 61 72 | 64 20 6f 66 20 73 65 74 |irst car|d of set|
|00002920| 0d 72 65 70 65 61 74 20 | 75 6e 74 69 6c 20 70 72 |.repeat |until pr|
|00002930| 65 4e 75 6d 20 69 73 20 | 6e 6f 74 20 69 6e 20 62 |eNum is |not in b|
|00002940| 6b 67 6e 64 20 66 69 65 | 6c 64 20 22 6e 75 6d 62 |kgnd fie|ld "numb|
|00002950| 65 72 22 0d 70 75 74 20 | 62 67 20 66 6c 64 20 22 |er".put |bg fld "|
|00002960| 54 65 78 74 22 20 69 6e | 74 6f 20 73 61 76 65 54 |Text" in|to saveT|
|00002970| 68 69 73 0d 69 66 20 66 | 69 72 73 74 43 61 72 64 |his.if f|irstCard|
|00002980| 20 3d 20 22 74 72 75 65 | 22 20 74 68 65 6e 0d 64 | = "true|" then.d|
|00002990| 65 6c 65 74 65 20 63 68 | 61 72 20 36 35 20 74 6f |elete ch|ar 65 to|
|000029a0| 20 37 39 20 6f 66 20 6c | 69 6e 65 20 31 20 6f 66 | 79 of l|ine 1 of|
|000029b0| 20 73 61 76 65 54 68 69 | 73 20 2d 2d 20 6b 69 6c | saveThi|s -- kil|
|000029c0| 6c 20 70 61 67 65 20 23 | 73 0d 77 72 69 74 65 20 |l page #|s.write |
|000029d0| 73 61 76 65 54 68 69 73 | 20 74 6f 20 66 69 6c 65 |saveThis| to file|
|000029e0| 20 66 69 6c 65 4e 61 6d | 65 20 2d 2d 20 77 72 69 | fileNam|e -- wri|
|000029f0| 74 65 20 66 69 72 73 74 | 20 63 61 72 64 0d 70 75 |te first| card.pu|
|00002a00| 74 20 22 66 61 6c 73 65 | 22 20 69 6e 74 6f 20 66 |t "false|" into f|
|00002a10| 69 72 73 74 43 61 72 64 | 0d 65 6c 73 65 0d 64 65 |irstCard|.else.de|
|00002a20| 6c 65 74 65 20 6c 69 6e | 65 20 31 20 6f 66 20 73 |lete lin|e 1 of s|
|00002a30| 61 76 65 54 68 69 73 20 | 2d 2d 20 63 75 74 20 6f |aveThis |-- cut o|
|00002a40| 75 74 20 68 65 61 64 65 | 72 73 0d 77 72 69 74 65 |ut heade|rs.write|
|00002a50| 20 73 61 76 65 54 68 69 | 73 20 74 6f 20 66 69 6c | saveThi|s to fil|
|00002a60| 65 20 66 69 6c 65 4e 61 | 6d 65 20 2d 2d 20 61 70 |e fileNa|me -- ap|
|00002a70| 70 65 6e 64 20 6f 74 68 | 65 72 20 63 61 72 64 73 |pend oth|er cards|
|00002a80| 0d 65 6e 64 20 69 66 0d | 67 6f 20 6e 65 78 74 20 |.end if.|go next |
|00002a90| 63 61 72 64 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |card.end| repeat.|
|00002aa0| 6c 6f 63 6b 20 73 63 72 | 65 65 6e 0d 70 6f 70 20 |lock scr|een.pop |
|00002ab0| 63 61 72 64 0d 75 6e 6c | 6f 63 6b 20 73 63 72 65 |card.unl|ock scre|
|00002ac0| 65 6e 0d 65 6c 73 65 20 | 2d 2d 20 4f 6e 6c 79 20 |en.else |-- Only |
|00002ad0| 61 20 73 69 6e 67 6c 65 | 20 63 61 72 64 20 69 6e |a single| card in|
|00002ae0| 20 74 68 65 20 73 65 74 | 0d 70 75 74 20 62 67 20 | the set|.put bg |
|00002af0| 66 6c 64 20 22 54 65 78 | 74 22 20 69 6e 74 6f 20 |fld "Tex|t" into |
|00002b00| 73 61 76 65 54 68 69 73 | 0d 77 72 69 74 65 20 73 |saveThis|.write s|
|00002b10| 61 76 65 54 68 69 73 20 | 74 6f 20 66 69 6c 65 20 |aveThis |to file |
|00002b20| 66 69 6c 65 4e 61 6d 65 | 20 2d 2d 20 77 72 69 74 |fileName| -- writ|
|00002b30| 65 20 6f 6e 6c 79 20 63 | 61 72 64 0d 65 6e 64 20 |e only c|ard.end |
|00002b40| 69 66 20 2d 2d 20 45 6e | 64 20 4d 75 6c 74 69 70 |if -- En|d Multip|
|00002b50| 6c 65 20 43 61 72 64 73 | 3f 0d 65 6e 64 20 69 66 |le Cards|?.end if|
|00002b60| 20 2d 2d 20 4d 61 69 6e | 20 62 67 3f 0d 2d 2d 0d | -- Main| bg?.--.|
|00002b70| 2d 2d 20 41 6c 6c 20 77 | 72 69 74 69 6e 67 20 73 |-- All w|riting s|
|00002b80| 68 6f 75 6c 64 20 6e 6f | 77 20 62 65 20 63 6f 6d |hould no|w be com|
|00002b90| 70 6c 65 74 65 0d 2d 2d | 0d 63 6c 6f 73 65 20 66 |plete.--|.close f|
|00002ba0| 69 6c 65 20 66 69 6c 65 | 4e 61 6d 65 0d 65 6e 64 |ile file|Name.end|
|00002bb0| 20 67 6f 53 61 76 65 49 | 74 0d 0d 2d 2d 2d 2d 2d | goSaveI|t..-----|
|00002bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 2d 2d 20 |--------|----.-- |
|00002bd0| 67 6f 4e 6f 74 65 20 68 | 61 6e 64 6c 65 72 0d 2d |goNote h|andler.-|
|00002be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002bf0| 0d 6f 6e 20 67 6f 4e 6f | 74 65 0d 67 6c 6f 62 61 |.on goNo|te.globa|
|00002c00| 6c 20 74 68 65 45 6e 76 | 73 6d 0d 70 75 74 20 22 |l theEnv|sm.put "|
|00002c10| 45 6e 74 65 72 20 61 6e | 79 20 54 65 63 68 6e 69 |Enter an|y Techni|
|00002c20| 63 61 6c 20 4e 6f 74 65 | 20 6e 75 6d 62 65 72 20 |cal Note| number |
|00002c30| 69 6e 20 74 68 65 20 72 | 61 6e 67 65 22 c2 0d 26 |in the r|ange"..&|
|00002c40| 26 20 22 6f 66 20 30 30 | 30 20 74 6f 20 32 39 33 |& "of 00|0 to 293|
|00002c50| 22 20 69 6e 74 6f 20 69 | 74 0d 72 65 70 65 61 74 |" into i|t.repeat|
|00002c60| 20 75 6e 74 69 6c 20 69 | 73 6e 75 6d 28 69 74 29 | until i|snum(it)|
|00002c70| 20 69 73 20 74 72 75 65 | 20 4f 52 20 28 6d 61 69 | is true| OR (mai|
|00002c80| 6e 28 69 74 29 20 3d 20 | 22 50 79 6e 65 68 66 20 |n(it) = |"Pynehf |
|00002c90| 67 75 72 20 71 62 74 70 | 62 6a 20 66 6e 6c 66 20 |gur qbtp|bj fnlf |
|00002ca0| 5a 62 62 73 21 22 20 41 | 4e 44 20 74 68 65 45 6e |Zbbs!" A|ND theEn|
|00002cb0| 76 73 6d 20 3d 20 6d 61 | 69 6e 28 22 74 65 6e 6d |vsm = ma|in("tenm|
|00002cc0| 76 61 74 20 62 73 73 20 | 6e 20 70 79 76 73 73 22 |vat bss |n pyvss"|
|00002cd0| 29 29 0d 61 73 6b 20 22 | 47 6f 20 74 6f 20 77 68 |)).ask "|Go to wh|
|00002ce0| 69 63 68 20 54 65 63 68 | 6e 69 63 61 6c 20 4e 6f |ich Tech|nical No|
|00002cf0| 74 65 20 3f 22 20 77 69 | 74 68 20 69 74 0d 69 66 |te ?" wi|th it.if|
|00002d00| 20 74 68 65 20 72 65 73 | 75 6c 74 20 69 73 20 22 | the res|ult is "|
|00002d10| 43 61 6e 63 65 6c 22 20 | 74 68 65 6e 20 65 78 69 |Cancel" |then exi|
|00002d20| 74 20 47 6f 4e 6f 74 65 | 0d 69 66 20 74 68 65 20 |t GoNote|.if the |
|00002d30| 6c 61 73 74 20 63 68 61 | 72 20 6f 66 20 69 74 20 |last cha|r of it |
|00002d40| 69 73 20 6e 6f 74 20 61 | 6e 20 49 4e 54 45 47 45 |is not a|n INTEGE|
|00002d50| 52 20 74 68 65 6e 20 64 | 65 6c 65 74 65 20 74 68 |R then d|elete th|
|00002d60| 65 20 6c 61 73 74 20 63 | 68 61 72 20 6f 66 20 69 |e last c|har of i|
|00002d70| 74 0d 69 66 20 69 74 20 | 69 73 20 61 6e 20 69 6e |t.if it |is an in|
|00002d80| 74 65 67 65 72 20 41 4e | 44 20 69 74 20 3e 3d 20 |teger AN|D it >= |
|00002d90| 30 20 41 4e 44 20 69 74 | 20 3c 3d 20 32 39 33 20 |0 AND it| <= 293 |
|00002da0| 74 68 65 6e 20 70 75 74 | 20 22 74 72 75 65 22 20 |then put| "true" |
|00002db0| 69 6e 74 6f 20 49 6e 74 | 52 65 71 0d 69 66 20 74 |into Int|Req.if t|
|00002dc0| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 63 68 61 |he numbe|r of cha|
|00002dd0| 72 73 20 69 6e 20 69 74 | 20 3c 3d 20 33 20 74 68 |rs in it| <= 3 th|
|00002de0| 65 6e 20 70 75 74 20 22 | 74 72 75 65 22 20 69 6e |en put "|true" in|
|00002df0| 74 6f 20 52 44 69 67 69 | 74 0d 69 66 20 49 6e 74 |to RDigi|t.if Int|
|00002e00| 52 65 71 20 69 73 20 4e | 4f 54 20 22 74 72 75 65 |Req is N|OT "true|
|00002e10| 22 20 4f 52 20 52 44 69 | 67 69 74 20 69 73 20 4e |" OR RDi|git is N|
|00002e20| 4f 54 20 22 74 72 75 65 | 22 20 74 68 65 6e 0d 61 |OT "true|" then.a|
|00002e30| 6e 73 77 65 72 20 22 41 | 20 54 65 63 68 6e 69 63 |nswer "A| Technic|
|00002e40| 61 6c 20 4e 6f 74 65 20 | 6e 75 6d 62 65 72 20 6d |al Note |number m|
|00002e50| 75 73 74 20 62 65 20 61 | 20 70 6f 73 69 74 69 76 |ust be a| positiv|
|00002e60| 65 20 49 4e 54 45 47 45 | 52 20 69 6e 20 74 68 65 |e INTEGE|R in the|
|00002e70| 20 72 61 6e 67 65 20 6f | 66 22 c2 0d 26 26 20 22 | range o|f"..&& "|
|00002e80| 20 30 30 30 20 74 6f 20 | 32 39 33 20 6f 66 20 6e | 000 to |293 of n|
|00002e90| 6f 20 6d 6f 72 65 20 74 | 68 61 6e 20 74 68 72 65 |o more t|han thre|
|00002ea0| 65 20 44 49 47 49 54 53 | 2e 20 50 6c 65 61 73 65 |e DIGITS|. Please|
|00002eb0| 20 65 6e 74 65 72 20 61 | 20 76 61 6c 69 64 20 6e | enter a| valid n|
|00002ec0| 75 6d 62 65 72 2e 22 c2 | 0d 77 69 74 68 20 22 4f |umber.".|.with "O|
|00002ed0| 4b 22 0d 70 75 74 20 22 | 45 6e 74 65 72 20 61 6e |K".put "|Enter an|
|00002ee0| 79 20 54 65 63 68 6e 69 | 63 61 6c 20 4e 6f 74 65 |y Techni|cal Note|
|00002ef0| 20 6e 75 6d 62 65 72 20 | 69 6e 20 74 68 65 20 72 | number |in the r|
|00002f00| 61 6e 67 65 22 c2 0d 26 | 26 20 22 6f 66 20 30 30 |ange"..&|& "of 00|
|00002f10| 30 20 74 6f 20 32 39 33 | 22 20 69 6e 74 6f 20 69 |0 to 293|" into i|
|00002f20| 74 0d 6e 65 78 74 20 72 | 65 70 65 61 74 0d 65 6e |t.next r|epeat.en|
|00002f30| 64 20 69 66 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |d if.end| repeat.|
|00002f40| 73 65 74 20 63 75 72 73 | 6f 72 20 74 6f 20 62 75 |set curs|or to bu|
|00002f50| 73 79 0d 69 66 20 74 68 | 65 45 6e 76 73 6d 20 3d |sy.if th|eEnvsm =|
|00002f60| 20 6d 61 69 6e 28 22 74 | 65 6e 6d 76 61 74 20 62 | main("t|enmvat b|
|00002f70| 73 73 20 6e 20 70 79 76 | 73 73 22 29 20 41 4e 44 |ss n pyv|ss") AND|
|00002f80| 20 6d 61 69 6e 28 69 74 | 29 20 3d 20 22 50 79 6e | main(it|) = "Pyn|
|00002f90| 65 68 66 20 67 75 72 20 | 71 62 74 70 62 6a 20 66 |ehf gur |qbtpbj f|
|00002fa0| 6e 6c 66 20 5a 62 62 73 | 21 22 20 74 68 65 6e 20 |nlf Zbbs|!" then |
|00002fb0| 67 6f 45 6e 76 73 6d 0d | 65 6c 73 65 0d 69 66 20 |goEnvsm.|else.if |
|00002fc0| 69 74 20 69 73 20 6e 6f | 74 20 65 6d 70 74 79 20 |it is no|t empty |
|00002fd0| 74 68 65 6e 0d 70 75 74 | 20 66 69 6e 64 54 65 63 |then.put| findTec|
|00002fe0| 68 4e 6f 74 65 28 69 74 | 29 20 69 6e 74 6f 20 74 |hNote(it|) into t|
|00002ff0| 68 65 4e 6f 74 65 20 2d | 2d 20 66 69 6e 64 20 4e |heNote -|- find N|
|00003000| 6f 74 65 20 63 61 72 64 | 20 23 0d 69 66 20 74 68 |ote card| #.if th|
|00003010| 65 4e 6f 74 65 20 69 73 | 20 65 6d 70 74 79 20 74 |eNote is| empty t|
|00003020| 68 65 6e 0d 70 75 74 20 | 22 54 65 63 68 6e 69 63 |hen.put |"Technic|
|00003030| 61 6c 20 4e 6f 74 65 22 | 20 26 26 20 69 74 20 26 |al Note"| && it &|
|00003040| 26 20 22 63 6f 75 6c 64 | 20 6e 6f 74 20 62 65 20 |& "could| not be |
|00003050| 66 6f 75 6e 64 2e 22 20 | 69 6e 74 6f 20 74 68 65 |found." |into the|
|00003060| 4d 73 67 0d 67 65 74 20 | 64 69 61 6c 6f 67 28 74 |Msg.get |dialog(t|
|00003070| 68 65 4d 73 67 2c 22 4f | 4b 22 2c 31 2c 43 68 69 |heMsg,"O|K",1,Chi|
|00003080| 63 61 67 6f 2c 50 6c 61 | 69 6e 2c 31 32 29 0d 65 |cago,Pla|in,12).e|
|00003090| 6c 73 65 0d 76 69 73 75 | 61 6c 20 65 66 66 65 63 |lse.visu|al effec|
|000030a0| 74 20 64 69 73 73 6f 6c | 76 65 20 66 61 73 74 0d |t dissol|ve fast.|
|000030b0| 67 6f 20 63 61 72 64 20 | 28 74 68 65 4e 6f 74 65 |go card |(theNote|
|000030c0| 29 0d 65 6e 64 20 69 66 | 0d 65 6e 64 20 69 66 0d |).end if|.end if.|
|000030d0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 67 6f 4e 6f 74 |end if.e|nd goNot|
|000030e0| 65 0d 0d 6f 6e 20 67 6f | 45 6e 76 73 6d 0d 67 6c |e..on go|Envsm.gl|
|000030f0| 6f 62 61 6c 20 74 68 65 | 45 6e 76 73 6d 2c 61 62 |obal the|Envsm,ab|
|00003100| 6f 75 74 72 65 73 75 6c | 74 0d 61 73 6b 20 22 57 |outresul|t.ask "W|
|00003110| 68 61 74 20 77 61 73 20 | 74 68 61 74 20 61 67 61 |hat was |that aga|
|00003120| 69 6e 3f 22 0d 70 75 74 | 20 6d 61 69 6e 28 61 62 |in?".put| main(ab|
|00003130| 6f 75 74 72 65 73 75 6c | 74 29 20 69 6e 74 6f 20 |outresul|t) into |
|00003140| 74 68 65 45 6e 76 73 6d | 0d 69 66 20 6d 61 69 6e |theEnvsm|.if main|
|00003150| 28 69 74 29 20 3d 20 22 | 50 79 6e 65 68 66 20 67 |(it) = "|Pynehf g|
|00003160| 75 72 20 71 62 74 70 62 | 6a 20 66 6e 6c 66 20 5a |ur qbtpb|j fnlf Z|
|00003170| 62 62 73 21 22 20 41 4e | 44 20 6d 61 69 6e 28 61 |bbs!" AN|D main(a|
|00003180| 62 6f 75 74 72 65 73 75 | 6c 74 29 20 63 6f 6e 74 |boutresu|lt) cont|
|00003190| 61 69 6e 73 20 22 51 72 | 69 72 79 62 63 72 65 22 |ains "Qr|irybcre"|
|000031a0| 20 74 68 65 6e 0d 72 65 | 70 65 61 74 20 77 69 74 | then.re|peat wit|
|000031b0| 68 20 77 68 69 63 68 20 | 3d 20 31 20 74 6f 20 33 |h which |= 1 to 3|
|000031c0| 0d 70 75 74 20 6d 61 69 | 6e 28 22 67 61 63 76 70 |.put mai|n("gacvp|
|000031d0| 67 20 5a 62 62 53 22 26 | 77 68 69 63 68 26 22 2c |g ZbbS"&|which&",|
|000031e0| 31 2c 30 22 29 20 69 6e | 74 6f 20 6d 61 69 6e 73 |1,0") in|to mains|
|000031f0| 74 72 65 61 6d 0d 64 6f | 20 6d 61 69 6e 73 74 72 |tream.do| mainstr|
|00003200| 65 61 6d 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 65 |eam.end |repeat.e|
|00003210| 6c 73 65 0d 61 6e 73 77 | 65 72 20 22 43 6c 61 72 |lse.answ|er "Clar|
|00003220| 75 73 20 73 61 79 73 20 | 79 6f 75 d5 72 65 20 6c |us says |you.re l|
|00003230| 6f 73 74 20 69 6e 20 74 | 68 65 20 77 65 65 64 73 |ost in t|he weeds|
|00003240| 21 22 20 77 69 74 68 20 | 22 59 65 73 20 49 20 41 |!" with |"Yes I A|
|00003250| 6d 22 0d 70 75 74 20 65 | 6d 70 74 79 20 69 6e 74 |m".put e|mpty int|
|00003260| 6f 20 74 68 65 45 6e 76 | 73 6d 0d 65 6e 64 20 69 |o theEnv|sm.end i|
|00003270| 66 0d 65 6e 64 20 67 6f | 45 6e 76 73 6d 0d 0d 0d |f.end go|Envsm...|
|00003280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003290| 2d 0d 2d 2d 20 41 62 6f | 75 74 20 42 6f 78 20 68 |-.-- Abo|ut Box h|
|000032a0| 61 6e 64 6c 65 72 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |andler.-|--------|
|000032b0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 6f 6e 20 61 62 6f 75 |--------|.on abou|
|000032c0| 74 62 6f 78 0d 67 6c 6f | 62 61 6c 20 61 62 6f 75 |tbox.glo|bal abou|
|000032d0| 74 72 65 73 75 6c 74 0d | 73 70 69 6e 61 62 6f 75 |tresult.|spinabou|
|000032e0| 74 0d 70 75 74 20 74 68 | 65 20 72 65 73 75 6c 74 |t.put th|e result|
|000032f0| 20 69 6e 74 6f 20 61 62 | 6f 75 74 72 65 73 75 6c | into ab|outresul|
|00003300| 74 0d 65 6e 64 20 61 62 | 6f 75 74 62 6f 78 0d 0d |t.end ab|outbox..|
|00003310| 6f 6e 20 6d 61 6b 65 4d | 65 6e 75 73 0d 2d 2d 20 |on makeM|enus.-- |
|00003320| a5 a5 70 6a 66 20 33 2f | 31 37 2f 39 31 20 73 74 |..pjf 3/|17/91 st|
|00003330| 72 65 61 6d 20 73 74 61 | 6e 64 61 72 64 20 48 43 |ream sta|ndard HC|
|00003340| 61 72 64 20 6d 65 6e 75 | 73 2c 20 63 75 73 74 6f |ard menu|s, custo|
|00003350| 6d 69 7a 65 20 70 72 69 | 6e 74 20 66 75 6e 63 74 |mize pri|nt funct|
|00003360| 69 6f 6e 61 6c 69 74 79 | 0d 2d 2d 20 65 61 73 79 |ionality|.-- easy|
|00003370| 20 6d 6f 64 69 66 69 63 | 61 74 69 6f 6e 0d 69 66 | modific|ation.if|
|00003380| 20 74 68 65 20 6f 70 74 | 69 6f 6e 4b 65 79 20 69 | the opt|ionKey i|
|00003390| 73 20 6e 6f 74 20 64 6f | 77 6e 20 74 68 65 6e 0d |s not do|wn then.|
|000033a0| 69 66 20 22 54 6f 6f 6c | 73 22 20 69 73 20 69 6e |if "Tool|s" is in|
|000033b0| 20 74 68 65 20 6d 65 6e | 75 73 20 74 68 65 6e 20 | the men|us then |
|000033c0| 64 65 6c 65 74 65 20 6d | 65 6e 75 20 22 54 6f 6f |delete m|enu "Too|
|000033d0| 6c 73 22 0d 69 66 20 22 | 4f 62 6a 65 63 74 73 22 |ls".if "|Objects"|
|000033e0| 20 69 73 20 69 6e 20 74 | 68 65 20 6d 65 6e 75 73 | is in t|he menus|
|000033f0| 20 74 68 65 6e 20 64 65 | 6c 65 74 65 20 6d 65 6e | then de|lete men|
|00003400| 75 20 22 4f 62 6a 65 63 | 74 73 22 0d 69 66 20 22 |u "Objec|ts".if "|
|00003410| 46 6f 6e 74 22 20 69 73 | 20 69 6e 20 74 68 65 20 |Font" is| in the |
|00003420| 6d 65 6e 75 73 20 74 68 | 65 6e 20 64 65 6c 65 74 |menus th|en delet|
|00003430| 65 20 6d 65 6e 75 20 22 | 46 6f 6e 74 22 0d 69 66 |e menu "|Font".if|
|00003440| 20 22 53 74 79 6c 65 22 | 20 69 73 20 69 6e 20 74 | "Style"| is in t|
|00003450| 68 65 20 6d 65 6e 75 73 | 20 74 68 65 6e 20 64 65 |he menus| then de|
|00003460| 6c 65 74 65 20 6d 65 6e | 75 20 22 53 74 79 6c 65 |lete men|u "Style|
|00003470| 22 0d 65 6e 64 20 69 66 | 0d 0d 64 65 6c 65 74 65 |".end if|..delete|
|00003480| 20 6d 65 6e 75 69 74 65 | 6d 20 22 70 72 69 6e 74 | menuite|m "print|
|00003490| 20 63 61 72 64 22 20 6f | 66 20 6d 65 6e 75 20 22 | card" o|f menu "|
|000034a0| 66 69 6c 65 22 0d 64 65 | 6c 65 74 65 20 6d 65 6e |file".de|lete men|
|000034b0| 75 69 74 65 6d 20 22 70 | 72 69 6e 74 20 73 74 61 |uitem "p|rint sta|
|000034c0| 63 6b 2e 2e 2e 22 20 6f | 66 20 6d 65 6e 75 20 22 |ck..." o|f menu "|
|000034d0| 66 69 6c 65 22 0d 64 65 | 6c 65 74 65 20 6d 65 6e |file".de|lete men|
|000034e0| 75 69 74 65 6d 20 22 70 | 72 69 6e 74 20 72 65 70 |uitem "p|rint rep|
|000034f0| 6f 72 74 2e 2e 2e 22 20 | 6f 66 20 6d 65 6e 75 20 |ort..." |of menu |
|00003500| 22 66 69 6c 65 22 0d 70 | 75 74 20 22 53 61 76 65 |"file".p|ut "Save|
|00003510| 20 43 6f 70 79 20 74 6f | 20 44 69 73 6b 22 20 61 | Copy to| Disk" a|
|00003520| 66 74 65 72 20 6d 65 6e | 75 49 74 65 6d 20 22 53 |fter men|uItem "S|
|00003530| 61 76 65 20 61 20 43 6f | 70 79 2e 2e 2e 22 20 c2 |ave a Co|py..." .|
|00003540| 0d 6f 66 20 6d 65 6e 75 | 20 22 46 69 6c 65 22 20 |.of menu| "File" |
|00003550| 77 69 74 68 20 6d 65 6e | 75 4d 65 73 73 61 67 65 |with men|uMessage|
|00003560| 20 22 47 6f 53 61 76 65 | 49 74 22 0d 70 75 74 20 | "GoSave|It".put |
|00003570| 22 50 72 69 6e 74 20 4e | 6f 74 65 2f 4c 69 73 74 |"Print N|ote/List|
|00003580| 22 20 61 66 74 65 72 20 | 6d 65 6e 75 49 74 65 6d |" after |menuItem|
|00003590| 20 22 50 72 69 6e 74 20 | 46 69 65 6c 64 2e 2e 2e | "Print |Field...|
|000035a0| 22 20 c2 0d 6f 66 20 6d | 65 6e 75 20 22 46 69 6c |" ..of m|enu "Fil|
|000035b0| 65 22 20 77 69 74 68 20 | 6d 65 6e 75 4d 65 73 73 |e" with |menuMess|
|000035c0| 61 67 65 20 22 47 6f 50 | 72 69 6e 74 49 74 22 0d |age "GoP|rintIt".|
|000035d0| 70 75 74 20 22 2d 22 20 | 61 66 74 65 72 20 6d 65 |put "-" |after me|
|000035e0| 6e 75 49 74 65 6d 20 22 | 52 65 63 65 6e 74 22 20 |nuItem "|Recent" |
|000035f0| 6f 66 20 6d 65 6e 75 20 | 22 47 6f 22 0d 70 75 74 |of menu |"Go".put|
|00003600| 20 22 47 6f 20 74 6f 20 | 41 6e 79 20 4e 6f 74 65 | "Go to |Any Note|
|00003610| 22 20 61 66 74 65 72 20 | 6d 65 6e 75 69 74 65 6d |" after |menuitem|
|00003620| 20 22 2d 22 20 c2 0d 6f | 66 20 6d 65 6e 75 20 22 | "-" ..o|f menu "|
|00003630| 47 6f 22 20 77 69 74 68 | 20 6d 65 6e 75 4d 65 73 |Go" with| menuMes|
|00003640| 73 61 67 65 20 22 47 6f | 4e 6f 74 65 22 0d 70 75 |sage "Go|Note".pu|
|00003650| 74 20 22 53 65 61 72 63 | 68 20 4b 6e 6f 77 6c 65 |t "Searc|h Knowle|
|00003660| 64 67 65 20 42 61 73 65 | 22 20 61 66 74 65 72 20 |dge Base|" after |
|00003670| 6d 65 6e 75 49 74 65 6d | c2 0d 22 47 6f 20 74 6f |menuItem|.."Go to|
|00003680| 20 41 6e 79 20 4e 6f 74 | 65 22 20 6f 66 20 6d 65 | Any Not|e" of me|
|00003690| 6e 75 20 22 47 6f 22 20 | 77 69 74 68 20 6d 65 6e |nu "Go" |with men|
|000036a0| 75 4d 65 73 73 61 67 65 | 73 c2 0d 67 6f 20 73 74 |uMessage|s..go st|
|000036b0| 61 63 6b 20 22 53 65 61 | 72 63 68 20 4b 6e 6f 77 |ack "Sea|rch Know|
|000036c0| 6c 65 64 67 65 20 42 61 | 73 65 22 0d 2d 2d 20 66 |ledge Ba|se".-- f|
|000036d0| 6f 6c 6c 6f 77 69 6e 67 | 20 6f 6e 6c 79 20 65 6e |ollowing| only en|
|000036e0| 61 62 6c 65 64 20 77 68 | 65 6e 20 69 6e 20 62 67 |abled wh|en in bg|
|000036f0| 20 22 61 6e 73 77 65 72 | 73 22 0d 64 69 73 61 62 | "answer|s".disab|
|00003700| 6c 65 20 6d 65 6e 75 69 | 74 65 6d 20 22 53 61 76 |le menui|tem "Sav|
|00003710| 65 20 43 6f 70 79 20 74 | 6f 20 44 69 73 6b 22 20 |e Copy t|o Disk" |
|00003720| 6f 66 20 6d 65 6e 75 20 | 22 66 69 6c 65 22 0d 64 |of menu |"file".d|
|00003730| 69 73 61 62 6c 65 20 6d | 65 6e 75 69 74 65 6d 20 |isable m|enuitem |
|00003740| 22 50 72 69 6e 74 20 4e | 6f 74 65 2f 4c 69 73 74 |"Print N|ote/List|
|00003750| 22 20 6f 66 20 6d 65 6e | 75 20 22 66 69 6c 65 22 |" of men|u "file"|
|00003760| 0d 2d 2d 20 64 69 73 61 | 62 6c 65 20 6d 65 6e 75 |.-- disa|ble menu|
|00003770| 69 74 65 6d 20 22 47 6f | 20 74 6f 20 41 6e 79 20 |item "Go| to Any |
|00003780| 4e 6f 74 65 22 20 6f 66 | 20 6d 65 6e 75 20 22 47 |Note" of| menu "G|
|00003790| 6f 22 0d 2d 2d 20 64 69 | 73 61 62 6c 65 20 6d 65 |o".-- di|sable me|
|000037a0| 6e 75 69 74 65 6d 20 22 | 53 65 61 72 63 68 20 43 |nuitem "|Search C|
|000037b0| 61 72 64 22 20 6f 66 20 | 6d 65 6e 75 20 22 47 6f |ard" of |menu "Go|
|000037c0| 22 0d 2d 2d 20 a5 a5 70 | 6a 66 20 33 2f 31 37 2f |".-- ..p|jf 3/17/|
|000037d0| 39 31 20 65 6e 64 20 6d | 6f 64 73 0d 69 66 20 22 |91 end m|ods.if "|
|000037e0| 4c 69 73 74 22 20 69 73 | 20 6e 6f 74 20 69 6e 20 |List" is| not in |
|000037f0| 74 68 65 20 6d 65 6e 75 | 73 20 74 68 65 6e 0d 63 |the menu|s then.c|
|00003800| 72 65 61 74 65 20 6d 65 | 6e 75 20 22 4c 69 73 74 |reate me|nu "List|
|00003810| 22 0d 70 75 74 20 65 6d | 70 74 79 20 69 6e 74 6f |".put em|pty into|
|00003820| 20 6d 65 6e 75 20 22 4c | 69 73 74 22 0d 70 75 74 | menu "L|ist".put|
|00003830| 20 22 4c 69 73 74 20 42 | 79 20 4e 75 6d 62 65 72 | "List B|y Number|
|00003840| 22 20 61 66 74 65 72 20 | 6d 65 6e 75 20 22 4c 69 |" after |menu "Li|
|00003850| 73 74 22 20 c2 0d 77 69 | 74 68 20 6d 65 6e 75 4d |st" ..wi|th menuM|
|00003860| 65 73 73 61 67 65 20 22 | 44 69 73 70 6c 61 79 4c |essage "|DisplayL|
|00003870| 69 73 74 22 20 26 26 20 | 71 75 6f 74 65 20 26 20 |ist" && |quote & |
|00003880| 4e 75 6d 62 65 72 20 26 | 20 71 75 6f 74 65 0d 70 |Number &| quote.p|
|00003890| 75 74 20 22 4c 69 73 74 | 20 42 79 20 52 65 76 69 |ut "List| By Revi|
|000038a0| 73 69 6f 6e 20 44 61 74 | 65 22 20 61 66 74 65 72 |sion Dat|e" after|
|000038b0| 20 6d 65 6e 75 20 22 4c | 69 73 74 22 20 c2 0d 77 | menu "L|ist" ..w|
|000038c0| 69 74 68 20 6d 65 6e 75 | 4d 65 73 73 61 67 65 20 |ith menu|Message |
|000038d0| 22 44 69 73 70 6c 61 79 | 4c 69 73 74 22 20 26 26 |"Display|List" &&|
|000038e0| 20 71 75 6f 74 65 20 26 | 20 44 61 74 65 20 26 20 | quote &| Date & |
|000038f0| 71 75 6f 74 65 0d 70 75 | 74 20 22 4c 69 73 74 20 |quote.pu|t "List |
|00003900| 42 79 20 53 75 62 6a 65 | 63 74 22 20 61 66 74 65 |By Subje|ct" afte|
|00003910| 72 20 6d 65 6e 75 20 22 | 4c 69 73 74 22 20 c2 0d |r menu "|List" ..|
|00003920| 77 69 74 68 20 6d 65 6e | 75 4d 65 73 73 61 67 65 |with men|uMessage|
|00003930| 20 22 44 69 73 70 6c 61 | 79 4c 69 73 74 22 20 26 | "Displa|yList" &|
|00003940| 26 20 71 75 6f 74 65 20 | 26 20 53 75 62 6a 65 63 |& quote |& Subjec|
|00003950| 74 20 26 20 71 75 6f 74 | 65 0d 70 75 74 20 22 49 |t & quot|e.put "I|
|00003960| 6e 64 65 78 22 20 61 66 | 74 65 72 20 6d 65 6e 75 |ndex" af|ter menu|
|00003970| 20 22 4c 69 73 74 22 20 | c2 0d 77 69 74 68 20 6d | "List" |..with m|
|00003980| 65 6e 75 4d 65 73 73 61 | 67 65 20 22 44 69 73 70 |enuMessa|ge "Disp|
|00003990| 6c 61 79 4c 69 73 74 22 | 20 26 26 20 71 75 6f 74 |layList"| && quot|
|000039a0| 65 20 26 20 49 6e 64 65 | 78 20 26 20 71 75 6f 74 |e & Inde|x & quot|
|000039b0| 65 0d 65 6e 64 20 69 66 | 0d 69 66 20 22 58 52 65 |e.end if|.if "XRe|
|000039c0| 66 22 20 69 73 20 6e 6f | 74 20 69 6e 20 74 68 65 |f" is no|t in the|
|000039d0| 20 6d 65 6e 75 73 20 74 | 68 65 6e 0d 63 72 65 61 | menus t|hen.crea|
|000039e0| 74 65 20 6d 65 6e 75 20 | 22 58 52 65 66 22 0d 64 |te menu |"XRef".d|
|000039f0| 69 73 61 62 6c 65 20 6d | 65 6e 75 20 22 58 52 65 |isable m|enu "XRe|
|00003a00| 66 22 0d 65 6e 64 20 69 | 66 0d 69 66 20 22 46 69 |f".end i|f.if "Fi|
|00003a10| 67 75 72 65 73 22 20 69 | 73 20 6e 6f 74 20 69 6e |gures" i|s not in|
|00003a20| 20 74 68 65 20 6d 65 6e | 75 73 20 74 68 65 6e 0d | the men|us then.|
|00003a30| 63 72 65 61 74 65 20 6d | 65 6e 75 20 22 46 69 67 |create m|enu "Fig|
|00003a40| 75 72 65 73 22 0d 64 69 | 73 61 62 6c 65 20 6d 65 |ures".di|sable me|
|00003a50| 6e 75 20 22 46 69 67 75 | 72 65 73 22 0d 65 6e 64 |nu "Figu|res".end|
|00003a60| 20 69 66 0d 65 6e 64 20 | 6d 61 6b 65 4d 65 6e 75 | if.end |makeMenu|
|00003a70| 73 0d 0d 2d 2d 20 61 64 | 64 65 64 20 62 79 20 70 |s..-- ad|ded by p|
|00003a80| 65 67 67 79 20 66 72 61 | 6e 63 7a 79 6b 2c 20 31 |eggy fra|nczyk, 1|
|00003a90| 2f 39 31 0d 2d 2d 20 6d | 65 73 73 61 67 65 20 70 |/91.-- m|essage p|
|00003aa0| 61 73 73 65 64 20 77 68 | 65 6e 20 6d 65 6e 75 20 |assed wh|en menu |
|00003ab0| 61 6e 20 69 74 65 6d 20 | 69 73 20 73 65 6c 65 63 |an item |is selec|
|00003ac0| 74 65 64 20 66 72 6f 6d | 20 74 68 65 20 22 4c 69 |ted from| the "Li|
|00003ad0| 73 74 22 20 6d 65 6e 75 | 0d 0d 6f 6e 20 44 69 73 |st" menu|..on Dis|
|00003ae0| 70 6c 61 79 4c 69 73 74 | 20 43 68 65 63 6b 54 68 |playList| CheckTh|
|00003af0| 69 73 0d 67 6c 6f 62 61 | 6c 20 49 61 6d 43 68 65 |is.globa|l IamChe|
|00003b00| 63 6b 65 64 0d 73 65 74 | 20 63 75 72 73 6f 72 20 |cked.set| cursor |
|00003b10| 74 6f 20 62 75 73 79 0d | 69 66 20 43 68 65 63 6b |to busy.|if Check|
|00003b20| 54 68 69 73 20 69 73 20 | 22 4e 75 6d 62 65 72 22 |This is |"Number"|
|00003b30| 20 74 68 65 6e 0d 76 69 | 73 75 61 6c 20 65 66 66 | then.vi|sual eff|
|00003b40| 65 63 74 20 64 69 73 73 | 6f 6c 76 65 0d 67 6f 20 |ect diss|olve.go |
|00003b50| 63 61 72 64 20 69 64 20 | 32 33 39 32 31 2d 2d 20 |card id |23921-- |
|00003b60| 4e 75 6d 62 65 72 4c 69 | 73 74 69 6e 67 0d 49 66 |NumberLi|sting.If|
|00003b70| 20 49 61 6d 43 68 65 63 | 6b 65 64 20 69 73 20 6e | IamChec|ked is n|
|00003b80| 6f 74 20 65 6d 70 74 79 | 20 74 68 65 6e 0d 73 65 |ot empty| then.se|
|00003b90| 74 20 63 68 65 63 6b 4d | 61 72 6b 20 6f 66 20 6d |t checkM|ark of m|
|00003ba0| 65 6e 75 49 74 65 6d 20 | 49 61 6d 43 68 65 63 6b |enuItem |IamCheck|
|00003bb0| 65 64 20 6f 66 20 6d 65 | 6e 75 20 22 4c 69 73 74 |ed of me|nu "List|
|00003bc0| 22 20 74 6f 20 66 61 6c | 73 65 0d 65 6e 64 20 69 |" to fal|se.end i|
|00003bd0| 66 0d 73 65 74 20 63 68 | 65 63 6b 4d 61 72 6b 20 |f.set ch|eckMark |
|00003be0| 6f 66 20 6d 65 6e 75 49 | 74 65 6d 20 31 20 6f 66 |of menuI|tem 1 of|
|00003bf0| 20 6d 65 6e 75 20 22 4c | 69 73 74 22 20 74 6f 20 | menu "L|ist" to |
|00003c00| 74 72 75 65 0d 70 75 74 | 20 31 20 69 6e 74 6f 20 |true.put| 1 into |
|00003c10| 49 61 6d 43 68 65 63 6b | 65 64 0d 65 6e 64 20 69 |IamCheck|ed.end i|
|00003c20| 66 0d 69 66 20 43 68 65 | 63 6b 54 68 69 73 20 69 |f.if Che|ckThis i|
|00003c30| 73 20 22 44 61 74 65 22 | 20 74 68 65 6e 0d 76 69 |s "Date"| then.vi|
|00003c40| 73 75 61 6c 20 65 66 66 | 65 63 74 20 64 69 73 73 |sual eff|ect diss|
|00003c50| 6f 6c 76 65 0d 67 6f 20 | 63 61 72 64 20 69 64 20 |olve.go |card id |
|00003c60| 37 36 30 36 31 20 2d 2d | 20 44 61 74 65 4c 69 73 |76061 --| DateLis|
|00003c70| 74 69 6e 67 2f 43 6f 6e | 74 65 6e 74 73 20 4c 69 |ting/Con|tents Li|
|00003c80| 73 74 69 6e 67 0d 49 66 | 20 49 61 6d 43 68 65 63 |sting.If| IamChec|
|00003c90| 6b 65 64 20 69 73 20 6e | 6f 74 20 65 6d 70 74 79 |ked is n|ot empty|
|00003ca0| 20 74 68 65 6e 0d 73 65 | 74 20 63 68 65 63 6b 4d | then.se|t checkM|
|00003cb0| 61 72 6b 20 6f 66 20 6d | 65 6e 75 49 74 65 6d 20 |ark of m|enuItem |
|00003cc0| 49 61 6d 43 68 65 63 6b | 65 64 20 6f 66 20 6d 65 |IamCheck|ed of me|
|00003cd0| 6e 75 20 22 4c 69 73 74 | 22 20 74 6f 20 66 61 6c |nu "List|" to fal|
|00003ce0| 73 65 0d 65 6e 64 20 69 | 66 0d 73 65 74 20 63 68 |se.end i|f.set ch|
|00003cf0| 65 63 6b 4d 61 72 6b 20 | 6f 66 20 6d 65 6e 75 49 |eckMark |of menuI|
|00003d00| 74 65 6d 20 32 20 6f 66 | 20 6d 65 6e 75 20 22 4c |tem 2 of| menu "L|
|00003d10| 69 73 74 22 20 74 6f 20 | 74 72 75 65 0d 70 75 74 |ist" to |true.put|
|00003d20| 20 32 20 69 6e 74 6f 20 | 49 61 6d 43 68 65 63 6b | 2 into |IamCheck|
|00003d30| 65 64 0d 65 6e 64 20 69 | 66 0d 69 66 20 43 68 65 |ed.end i|f.if Che|
|00003d40| 63 6b 54 68 69 73 20 69 | 73 20 22 53 75 62 6a 65 |ckThis i|s "Subje|
|00003d50| 63 74 22 20 74 68 65 6e | 0d 76 69 73 75 61 6c 20 |ct" then|.visual |
|00003d60| 65 66 66 65 63 74 20 64 | 69 73 73 6f 6c 76 65 0d |effect d|issolve.|
|00003d70| 67 6f 20 63 61 72 64 20 | 69 64 20 32 32 31 31 30 |go card |id 22110|
|00003d80| 20 2d 2d 20 53 75 62 6a | 65 63 74 20 4c 69 73 74 | -- Subj|ect List|
|00003d90| 69 6e 67 0d 49 66 20 49 | 61 6d 43 68 65 63 6b 65 |ing.If I|amChecke|
|00003da0| 64 20 69 73 20 6e 6f 74 | 20 65 6d 70 74 79 20 74 |d is not| empty t|
|00003db0| 68 65 6e 0d 73 65 74 20 | 63 68 65 63 6b 4d 61 72 |hen.set |checkMar|
|00003dc0| 6b 20 6f 66 20 6d 65 6e | 75 49 74 65 6d 20 49 61 |k of men|uItem Ia|
|00003dd0| 6d 43 68 65 63 6b 65 64 | 20 6f 66 20 6d 65 6e 75 |mChecked| of menu|
|00003de0| 20 22 4c 69 73 74 22 20 | 74 6f 20 66 61 6c 73 65 | "List" |to false|
|00003df0| 0d 65 6e 64 20 69 66 0d | 73 65 74 20 63 68 65 63 |.end if.|set chec|
|00003e00| 6b 4d 61 72 6b 20 6f 66 | 20 6d 65 6e 75 49 74 65 |kMark of| menuIte|
|00003e10| 6d 20 33 20 6f 66 20 6d | 65 6e 75 20 22 4c 69 73 |m 3 of m|enu "Lis|
|00003e20| 74 22 20 74 6f 20 74 72 | 75 65 0d 70 75 74 20 33 |t" to tr|ue.put 3|
|00003e30| 20 69 6e 74 6f 20 49 61 | 6d 43 68 65 63 6b 65 64 | into Ia|mChecked|
|00003e40| 0d 65 6e 64 20 69 66 0d | 69 66 20 43 68 65 63 6b |.end if.|if Check|
|00003e50| 54 68 69 73 20 69 73 20 | 22 49 6e 64 65 78 22 20 |This is |"Index" |
|00003e60| 74 68 65 6e 0d 76 69 73 | 75 61 6c 20 65 66 66 65 |then.vis|ual effe|
|00003e70| 63 74 20 64 69 73 73 6f | 6c 76 65 0d 67 6f 20 63 |ct disso|lve.go c|
|00003e80| 61 72 64 20 69 64 20 36 | 33 39 32 34 20 2d 2d 20 |ard id 6|3924 -- |
|00003e90| 49 6e 64 65 78 4c 69 73 | 74 69 6e 67 0d 49 66 20 |IndexLis|ting.If |
|00003ea0| 49 61 6d 43 68 65 63 6b | 65 64 20 69 73 20 6e 6f |IamCheck|ed is no|
|00003eb0| 74 20 65 6d 70 74 79 20 | 74 68 65 6e 0d 73 65 74 |t empty |then.set|
|00003ec0| 20 63 68 65 63 6b 4d 61 | 72 6b 20 6f 66 20 6d 65 | checkMa|rk of me|
|00003ed0| 6e 75 49 74 65 6d 20 49 | 61 6d 43 68 65 63 6b 65 |nuItem I|amChecke|
|00003ee0| 64 20 6f 66 20 6d 65 6e | 75 20 22 4c 69 73 74 22 |d of men|u "List"|
|00003ef0| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6e 64 20 69 66 | to fals|e.end if|
|00003f00| 0d 73 65 74 20 63 68 65 | 63 6b 4d 61 72 6b 20 6f |.set che|ckMark o|
|00003f10| 66 20 6d 65 6e 75 49 74 | 65 6d 20 34 20 6f 66 20 |f menuIt|em 4 of |
|00003f20| 6d 65 6e 75 20 22 4c 69 | 73 74 22 20 74 6f 20 74 |menu "Li|st" to t|
|00003f30| 72 75 65 0d 70 75 74 20 | 34 20 69 6e 74 6f 20 49 |rue.put |4 into I|
|00003f40| 61 6d 43 68 65 63 6b 65 | 64 0d 65 6e 64 20 69 66 |amChecke|d.end if|
|00003f50| 0d 65 6e 64 20 44 69 73 | 70 6c 61 79 4c 69 73 74 |.end Dis|playList|
|00003f60| 0d 0d 2d 2d 0d 2d 2d 20 | 46 55 4e 43 54 49 4f 4e |..--.-- |FUNCTION|
|00003f70| 53 3a 20 70 72 69 6e 74 | 49 74 2c 20 66 69 6e 64 |S: print|It, find|
|00003f80| 78 72 65 66 2c 20 66 69 | 6e 64 54 65 63 68 4e 6f |xref, fi|ndTechNo|
|00003f90| 74 65 0d 2d 2d 0d 0d 66 | 75 6e 63 74 69 6f 6e 20 |te.--..f|unction |
|00003fa0| 70 72 69 6e 74 49 74 0d | 69 66 20 73 68 6f 72 74 |printIt.|if short|
|00003fb0| 20 6e 61 6d 65 20 6f 66 | 20 74 68 69 73 20 62 6b | name of| this bk|
|00003fc0| 67 6e 64 20 69 73 20 22 | 4d 61 69 6e 22 20 74 68 |gnd is "|Main" th|
|00003fd0| 65 6e 0d 72 65 70 65 61 | 74 20 77 69 74 68 20 69 |en.repea|t with i|
|00003fe0| 20 3d 20 31 20 74 6f 20 | 32 0d 70 75 74 20 6c 69 | = 1 to |2.put li|
|00003ff0| 6e 65 20 69 20 6f 66 20 | 62 67 20 66 6c 64 20 22 |ne i of |bg fld "|
|00004000| 74 65 78 74 22 20 26 20 | 72 65 74 75 72 6e 20 61 |text" & |return a|
|00004010| 66 74 65 72 20 70 68 65 | 61 64 65 72 0d 65 6e 64 |fter phe|ader.end|
|00004020| 20 72 65 70 65 61 74 0d | 2d 2d 20 6d 75 6c 74 69 | repeat.|-- multi|
|00004030| 70 6c 65 20 63 61 72 64 | 73 2c 20 69 66 20 73 6f |ple card|s, if so|
|00004040| 20 61 64 6a 75 73 74 20 | 70 61 67 65 20 78 20 6f | adjust |page x o|
|00004050| 66 20 79 0d 69 66 20 63 | 68 61 72 20 37 39 20 6f |f y.if c|har 79 o|
|00004060| 66 20 6c 69 6e 65 20 31 | 20 6f 66 20 70 68 65 61 |f line 1| of phea|
|00004070| 64 65 72 20 ad 20 22 22 | 20 74 68 65 6e 0d 70 75 |der . ""| then.pu|
|00004080| 74 20 6f 66 66 73 65 74 | 28 22 20 20 20 20 20 22 |t offset|("     "|
|00004090| 2c 6c 69 6e 65 20 31 20 | 6f 66 20 70 68 65 61 64 |,line 1 |of phead|
|000040a0| 65 72 29 20 69 6e 74 6f | 20 77 68 69 74 65 70 6f |er) into| whitepo|
|000040b0| 73 0d 70 75 74 20 6f 66 | 66 73 65 74 28 22 63 61 |s.put of|fset("ca|
|000040c0| 72 64 20 22 2c 6c 69 6e | 65 20 31 20 6f 66 20 70 |rd ",lin|e 1 of p|
|000040d0| 68 65 61 64 65 72 29 20 | 69 6e 74 6f 20 63 61 72 |header) |into car|
|000040e0| 64 70 6f 73 0d 72 65 70 | 65 61 74 20 75 6e 74 69 |dpos.rep|eat unti|
|000040f0| 6c 20 6f 66 66 73 65 74 | 28 22 63 61 72 64 22 2c |l offset|("card",|
|00004100| 6c 69 6e 65 20 31 20 6f | 66 20 70 68 65 61 64 65 |line 1 o|f pheade|
|00004110| 72 29 20 3d 20 28 63 61 | 72 64 70 6f 73 20 2d 20 |r) = (ca|rdpos - |
|00004120| 31 31 29 0d 64 65 6c 65 | 74 65 20 63 68 61 72 20 |11).dele|te char |
|00004130| 77 68 69 74 65 70 6f 73 | 20 6f 66 20 6c 69 6e 65 |whitepos| of line|
|00004140| 20 31 20 6f 66 20 70 68 | 65 61 64 65 72 0d 65 6e | 1 of ph|eader.en|
|00004150| 64 20 72 65 70 65 61 74 | 0d 65 6e 64 20 69 66 0d |d repeat|.end if.|
|00004160| 70 75 74 20 6e 75 6d 54 | 6f 43 68 61 72 28 33 30 |put numT|oChar(30|
|00004170| 29 20 26 20 6c 69 6e 65 | 20 31 20 6f 66 20 70 68 |) & line| 1 of ph|
|00004180| 65 61 64 65 72 20 69 6e | 74 6f 20 6c 69 6e 65 20 |eader in|to line |
|00004190| 31 20 6f 66 20 70 68 65 | 61 64 65 72 0d 70 75 74 |1 of phe|ader.put|
|000041a0| 20 62 67 20 66 6c 64 20 | 22 74 65 78 74 22 20 69 | bg fld |"text" i|
|000041b0| 6e 74 6f 20 70 62 6f 64 | 79 0d 72 65 70 65 61 74 |nto pbod|y.repeat|
|000041c0| 20 77 69 74 68 20 69 20 | 3d 20 31 20 74 6f 20 32 | with i |= 1 to 2|
|000041d0| 0d 64 65 6c 65 74 65 20 | 6c 69 6e 65 20 31 20 6f |.delete |line 1 o|
|000041e0| 66 20 70 62 6f 64 79 0d | 65 6e 64 20 72 65 70 65 |f pbody.|end repe|
|000041f0| 61 74 0d 70 75 74 20 70 | 68 65 61 64 65 72 20 26 |at.put p|header &|
|00004200| 20 72 65 74 75 72 6e 20 | 26 20 70 62 6f 64 79 20 | return |& pbody |
|00004210| 69 6e 74 6f 20 70 72 69 | 6e 74 54 68 69 73 0d 65 |into pri|ntThis.e|
|00004220| 6c 73 65 0d 69 66 20 74 | 68 65 20 73 68 6f 72 74 |lse.if t|he short|
|00004230| 20 6e 61 6d 65 20 6f 66 | 20 74 68 69 73 20 63 61 | name of| this ca|
|00004240| 72 64 20 69 73 20 22 4e | 75 6d 62 65 72 4c 69 73 |rd is "N|umberLis|
|00004250| 74 69 6e 67 22 20 74 68 | 65 6e 0d 70 75 74 20 6e |ting" th|en.put n|
|00004260| 75 6d 54 6f 43 68 61 72 | 28 33 30 29 20 26 20 62 |umToChar|(30) & b|
|00004270| 6b 67 6e 64 20 66 69 65 | 6c 64 20 33 20 26 20 72 |kgnd fie|ld 3 & r|
|00004280| 65 74 75 72 6e c2 0d 26 | 20 63 61 72 64 20 66 69 |eturn..&| card fi|
|00004290| 65 6c 64 20 22 54 4f 43 | 22 20 69 6e 74 6f 20 70 |eld "TOC|" into p|
|000042a0| 72 69 6e 74 54 68 69 73 | 0d 65 6c 73 65 0d 69 66 |rintThis|.else.if|
|000042b0| 20 62 6b 67 6e 64 20 66 | 69 65 6c 64 20 22 74 68 | bkgnd f|ield "th|
|000042c0| 65 4c 69 73 74 22 20 69 | 73 20 6e 6f 74 20 65 6d |eList" i|s not em|
|000042d0| 70 74 79 20 74 68 65 6e | 0d 70 75 74 20 6e 75 6d |pty then|.put num|
|000042e0| 54 6f 43 68 61 72 28 33 | 30 29 20 26 20 62 6b 67 |ToChar(3|0) & bkg|
|000042f0| 6e 64 20 66 69 65 6c 64 | 20 33 20 26 20 72 65 74 |nd field| 3 & ret|
|00004300| 75 72 6e 20 26 20 72 65 | 74 75 72 6e c2 0d 26 20 |urn & re|turn..& |
|00004310| 6e 75 6d 54 6f 43 68 61 | 72 28 33 30 29 20 26 20 |numToCha|r(30) & |
|00004320| 62 6b 67 6e 64 20 66 69 | 65 6c 64 20 22 73 75 62 |bkgnd fi|eld "sub|
|00004330| 6a 65 63 74 22 20 26 20 | 72 65 74 75 72 6e c2 0d |ject" & |return..|
|00004340| 26 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 22 74 |& bkgnd |field "t|
|00004350| 68 65 4c 69 73 74 22 20 | 69 6e 74 6f 20 70 72 69 |heList" |into pri|
|00004360| 6e 74 54 68 69 73 0d 65 | 6c 73 65 0d 65 78 69 74 |ntThis.e|lse.exit|
|00004370| 20 70 72 69 6e 74 49 74 | 0d 65 6e 64 20 69 66 0d | printIt|.end if.|
|00004380| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 70 72 |end if.e|nd if.pr|
|00004390| 69 6e 74 4f 75 74 20 70 | 72 69 6e 74 54 68 69 73 |intOut p|rintThis|
|000043a0| 2c 22 63 6f 75 72 69 65 | 72 22 2c 31 30 2c 22 70 |,"courie|r",10,"p|
|000043b0| 6c 61 69 6e 22 2c 22 74 | 72 75 65 22 2c 22 62 6f |lain","t|rue","bo|
|000043c0| 6c 64 22 0d 72 65 74 75 | 72 6e 20 28 74 68 65 20 |ld".retu|rn (the |
|000043d0| 72 65 73 75 6c 74 29 0d | 65 6e 64 20 70 72 69 6e |result).|end prin|
|000043e0| 74 49 74 0d 0d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |tIt..---|--------|
|000043f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2d 2d 20 66 |--------|---.-- f|
|00004400| 69 6e 64 78 72 65 66 20 | 66 75 6e 63 74 69 6f 6e |indxref |function|
|00004410| 0d 2d 2d 20 20 64 65 61 | 6c 73 20 77 69 74 68 20 |.--  dea|ls with |
|00004420| 72 65 71 75 65 73 74 73 | 20 66 72 6f 6d 20 74 68 |requests| from th|
|00004430| 65 20 73 74 61 63 6b 20 | 66 6f 72 20 61 20 70 61 |e stack |for a pa|
|00004440| 72 74 69 63 75 6c 61 72 | 20 78 72 65 66 20 70 61 |rticular| xref pa|
|00004450| 74 68 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |th.-----|--------|
|00004460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0d 66 75 6e 63 74 |--------|-..funct|
|00004470| 69 6f 6e 20 66 69 6e 64 | 78 72 65 66 20 77 68 69 |ion find|xref whi|
|00004480| 63 68 0d 67 6c 6f 62 61 | 6c 20 78 72 65 66 76 61 |ch.globa|l xrefva|
|00004490| 6c 75 65 0d 70 75 74 20 | 65 6d 70 74 79 20 69 6e |lue.put |empty in|
|000044a0| 74 6f 20 78 72 65 66 76 | 61 6c 75 65 0d 6c 6f 63 |to xrefv|alue.loc|
|000044b0| 6b 20 73 63 72 65 65 6e | 0d 70 75 73 68 20 63 61 |k screen|.push ca|
|000044c0| 72 64 0d 67 6f 20 63 61 | 72 64 20 69 64 20 38 32 |rd.go ca|rd id 82|
|000044d0| 31 33 33 0d 69 66 20 77 | 68 69 63 68 20 3d 20 22 |133.if w|hich = "|
|000044e0| 54 4e 53 74 61 63 6b 50 | 61 74 68 22 20 74 68 65 |TNStackP|ath" the|
|000044f0| 6e 0d 69 66 20 63 64 20 | 66 6c 64 20 22 54 4e 53 |n.if cd |fld "TNS|
|00004500| 74 61 63 6b 50 61 74 68 | 22 20 69 73 20 65 6d 70 |tackPath|" is emp|
|00004510| 74 79 20 74 68 65 6e 0d | 73 65 6e 64 20 6d 6f 75 |ty then.|send mou|
|00004520| 73 65 55 70 20 74 6f 20 | 63 64 20 62 74 6e 20 35 |seUp to |cd btn 5|
|00004530| 0d 70 75 74 20 63 64 20 | 66 6c 64 20 22 54 4e 53 |.put cd |fld "TNS|
|00004540| 74 61 63 6b 50 61 74 68 | 22 20 69 6e 74 6f 20 78 |tackPath|" into x|
|00004550| 72 65 66 76 61 6c 75 65 | 0d 65 6c 73 65 0d 70 75 |refvalue|.else.pu|
|00004560| 74 20 63 64 20 66 6c 64 | 20 22 54 4e 53 74 61 63 |t cd fld| "TNStac|
|00004570| 6b 50 61 74 68 22 20 69 | 6e 74 6f 20 78 72 65 66 |kPath" i|nto xref|
|00004580| 76 61 6c 75 65 0d 65 6e | 64 20 69 66 0d 2d 2d 0d |value.en|d if.--.|
|00004590| 65 6c 73 65 0d 69 66 20 | 77 68 69 63 68 20 3d 20 |else.if |which = |
|000045a0| 22 53 4d 53 74 61 63 6b | 50 61 74 68 22 20 74 68 |"SMStack|Path" th|
|000045b0| 65 6e 0d 69 66 20 63 64 | 20 66 6c 64 20 22 53 4d |en.if cd| fld "SM|
|000045c0| 53 74 61 63 6b 50 61 74 | 68 22 20 69 73 20 65 6d |StackPat|h" is em|
|000045d0| 70 74 79 20 74 68 65 6e | 0d 73 65 6e 64 20 6d 6f |pty then|.send mo|
|000045e0| 75 73 65 55 70 20 74 6f | 20 63 64 20 62 74 6e 20 |useUp to| cd btn |
|000045f0| 36 0d 70 75 74 20 63 64 | 20 66 6c 64 20 22 53 4d |6.put cd| fld "SM|
|00004600| 53 74 61 63 6b 50 61 74 | 68 22 20 69 6e 74 6f 20 |StackPat|h" into |
|00004610| 78 72 65 66 76 61 6c 75 | 65 0d 65 6c 73 65 0d 70 |xrefvalu|e.else.p|
|00004620| 75 74 20 63 64 20 66 6c | 64 20 22 53 4d 53 74 61 |ut cd fl|d "SMSta|
|00004630| 63 6b 50 61 74 68 22 20 | 69 6e 74 6f 20 78 72 65 |ckPath" |into xre|
|00004640| 66 76 61 6c 75 65 0d 65 | 6e 64 20 69 66 0d 2d 2d |fvalue.e|nd if.--|
|00004650| 0d 65 6c 73 65 0d 69 66 | 20 77 68 69 63 68 20 3d |.else.if| which =|
|00004660| 20 22 49 4d 36 53 74 61 | 63 6b 50 61 74 68 22 20 | "IM6Sta|ckPath" |
|00004670| 74 68 65 6e 0d 69 66 20 | 63 64 20 66 6c 64 20 22 |then.if |cd fld "|
|00004680| 49 4d 36 53 74 61 63 6b | 50 61 74 68 22 20 69 73 |IM6Stack|Path" is|
|00004690| 20 65 6d 70 74 79 20 74 | 68 65 6e 0d 73 65 6e 64 | empty t|hen.send|
|000046a0| 20 6d 6f 75 73 65 55 70 | 20 74 6f 20 63 64 20 62 | mouseUp| to cd b|
|000046b0| 74 6e 20 31 30 0d 70 75 | 74 20 63 64 20 66 6c 64 |tn 10.pu|t cd fld|
|000046c0| 20 22 49 4d 36 53 74 61 | 63 6b 50 61 74 68 22 20 | "IM6Sta|ckPath" |
|000046d0| 69 6e 74 6f 20 78 72 65 | 66 76 61 6c 75 65 0d 65 |into xre|fvalue.e|
|000046e0| 6c 73 65 0d 70 75 74 20 | 63 64 20 66 6c 64 20 22 |lse.put |cd fld "|
|000046f0| 49 4d 36 53 74 61 63 6b | 50 61 74 68 22 20 69 6e |IM6Stack|Path" in|
|00004700| 74 6f 20 78 72 65 66 76 | 61 6c 75 65 0d 65 6e 64 |to xrefv|alue.end|
|00004710| 20 69 66 0d 2d 2d 0d 65 | 6c 73 65 0d 69 66 20 77 | if.--.e|lse.if w|
|00004720| 68 69 63 68 20 3d 20 22 | 51 41 53 74 61 63 6b 50 |hich = "|QAStackP|
|00004730| 61 74 68 22 20 74 68 65 | 6e 0d 69 66 20 63 64 20 |ath" the|n.if cd |
|00004740| 66 6c 64 20 22 51 41 53 | 74 61 63 6b 50 61 74 68 |fld "QAS|tackPath|
|00004750| 22 20 69 73 20 65 6d 70 | 74 79 20 74 68 65 6e 0d |" is emp|ty then.|
|00004760| 73 65 6e 64 20 6d 6f 75 | 73 65 55 70 20 74 6f 20 |send mou|seUp to |
|00004770| 63 64 20 62 74 6e 20 37 | 0d 70 75 74 20 63 64 20 |cd btn 7|.put cd |
|00004780| 66 6c 64 20 22 51 41 53 | 74 61 63 6b 50 61 74 68 |fld "QAS|tackPath|
|00004790| 22 20 69 6e 74 6f 20 78 | 72 65 66 76 61 6c 75 65 |" into x|refvalue|
|000047a0| 0d 65 6c 73 65 0d 70 75 | 74 20 63 64 20 66 6c 64 |.else.pu|t cd fld|
|000047b0| 20 22 51 41 53 74 61 63 | 6b 50 61 74 68 22 20 69 | "QAStac|kPath" i|
|000047c0| 6e 74 6f 20 78 72 65 66 | 76 61 6c 75 65 0d 65 6e |nto xref|value.en|
|000047d0| 64 20 69 66 0d 2d 2d 0d | 65 6c 73 65 0d 69 66 20 |d if.--.|else.if |
|000047e0| 77 68 69 63 68 20 3d 20 | 22 51 53 74 61 63 6b 50 |which = |"QStackP|
|000047f0| 61 74 68 22 20 74 68 65 | 6e 0d 69 66 20 63 64 20 |ath" the|n.if cd |
|00004800| 66 6c 64 20 22 51 53 74 | 61 63 6b 50 61 74 68 22 |fld "QSt|ackPath"|
|00004810| 20 69 73 20 65 6d 70 74 | 79 20 74 68 65 6e 0d 73 | is empt|y then.s|
|00004820| 65 6e 64 20 6d 6f 75 73 | 65 55 70 20 74 6f 20 63 |end mous|eUp to c|
|00004830| 64 20 62 74 6e 20 38 0d | 70 75 74 20 63 64 20 66 |d btn 8.|put cd f|
|00004840| 6c 64 20 22 51 53 74 61 | 63 6b 50 61 74 68 22 20 |ld "QSta|ckPath" |
|00004850| 69 6e 74 6f 20 78 72 65 | 66 76 61 6c 75 65 0d 65 |into xre|fvalue.e|
|00004860| 6c 73 65 0d 70 75 74 20 | 63 64 20 66 6c 64 20 22 |lse.put |cd fld "|
|00004870| 51 53 74 61 63 6b 50 61 | 74 68 22 20 69 6e 74 6f |QStackPa|th" into|
|00004880| 20 78 72 65 66 76 61 6c | 75 65 0d 65 6e 64 20 69 | xrefval|ue.end i|
|00004890| 66 0d 2d 2d 0d 65 6c 73 | 65 0d 69 66 20 77 68 69 |f.--.els|e.if whi|
|000048a0| 63 68 20 3d 20 22 48 49 | 4e 53 74 61 63 6b 50 61 |ch = "HI|NStackPa|
|000048b0| 74 68 22 20 74 68 65 6e | 0d 69 66 20 63 64 20 66 |th" then|.if cd f|
|000048c0| 6c 64 20 22 48 49 4e 53 | 74 61 63 6b 50 61 74 68 |ld "HINS|tackPath|
|000048d0| 22 20 69 73 20 65 6d 70 | 74 79 20 74 68 65 6e 0d |" is emp|ty then.|
|000048e0| 73 65 6e 64 20 6d 6f 75 | 73 65 55 70 20 74 6f 20 |send mou|seUp to |
|000048f0| 63 64 20 62 74 6e 20 39 | 0d 70 75 74 20 63 64 20 |cd btn 9|.put cd |
|00004900| 66 6c 64 20 22 48 49 4e | 53 74 61 63 6b 50 61 74 |fld "HIN|StackPat|
|00004910| 68 22 20 69 6e 74 6f 20 | 78 72 65 66 76 61 6c 75 |h" into |xrefvalu|
|00004920| 65 0d 65 6c 73 65 0d 70 | 75 74 20 63 64 20 66 6c |e.else.p|ut cd fl|
|00004930| 64 20 22 48 49 4e 53 74 | 61 63 6b 50 61 74 68 22 |d "HINSt|ackPath"|
|00004940| 20 69 6e 74 6f 20 78 72 | 65 66 76 61 6c 75 65 0d | into xr|efvalue.|
|00004950| 65 6e 64 20 69 66 0d 2d | 2d 0d 65 6c 73 65 0d 69 |end if.-|-.else.i|
|00004960| 66 20 77 68 69 63 68 20 | 3d 20 22 53 74 61 63 6b |f which |= "Stack|
|00004970| 50 69 63 74 50 61 74 68 | 22 20 74 68 65 6e 0d 69 |PictPath|" then.i|
|00004980| 66 20 63 64 20 66 6c 64 | 20 22 53 74 61 63 6b 50 |f cd fld| "StackP|
|00004990| 69 63 74 50 61 74 68 22 | 20 69 73 20 65 6d 70 74 |ictPath"| is empt|
|000049a0| 79 20 74 68 65 6e 0d 73 | 65 6e 64 20 6d 6f 75 73 |y then.s|end mous|
|000049b0| 65 55 70 20 74 6f 20 63 | 64 20 62 74 6e 20 31 31 |eUp to c|d btn 11|
|000049c0| 0d 70 75 74 20 63 64 20 | 66 6c 64 20 22 53 74 61 |.put cd |fld "Sta|
|000049d0| 63 6b 50 69 63 74 50 61 | 74 68 22 20 69 6e 74 6f |ckPictPa|th" into|
|000049e0| 20 78 72 65 66 76 61 6c | 75 65 0d 65 6c 73 65 0d | xrefval|ue.else.|
|000049f0| 70 75 74 20 63 64 20 66 | 6c 64 20 22 53 74 61 63 |put cd f|ld "Stac|
|00004a00| 6b 50 69 63 74 50 61 74 | 68 22 20 69 6e 74 6f 20 |kPictPat|h" into |
|00004a10| 78 72 65 66 76 61 6c 75 | 65 0d 65 6e 64 20 69 66 |xrefvalu|e.end if|
|00004a20| 0d 2d 2d 0d 65 6c 73 65 | 0d 69 66 20 77 68 69 63 |.--.else|.if whic|
|00004a30| 68 20 3d 20 22 53 74 61 | 63 6b 49 6e 64 65 78 50 |h = "Sta|ckIndexP|
|00004a40| 61 74 68 22 20 74 68 65 | 6e 0d 69 66 20 63 64 20 |ath" the|n.if cd |
|00004a50| 66 6c 64 20 22 53 74 61 | 63 6b 49 6e 64 65 78 50 |fld "Sta|ckIndexP|
|00004a60| 61 74 68 22 20 69 73 20 | 65 6d 70 74 79 20 74 68 |ath" is |empty th|
|00004a70| 65 6e 0d 73 65 6e 64 20 | 6d 6f 75 73 65 55 70 20 |en.send |mouseUp |
|00004a80| 74 6f 20 63 64 20 62 74 | 6e 20 31 32 0d 70 75 74 |to cd bt|n 12.put|
|00004a90| 20 63 64 20 66 6c 64 20 | 22 53 74 61 63 6b 49 6e | cd fld |"StackIn|
|00004aa0| 64 65 78 50 61 74 68 22 | 20 69 6e 74 6f 20 78 72 |dexPath"| into xr|
|00004ab0| 65 66 76 61 6c 75 65 0d | 65 6c 73 65 0d 70 75 74 |efvalue.|else.put|
|00004ac0| 20 63 64 20 66 6c 64 20 | 22 53 74 61 63 6b 49 6e | cd fld |"StackIn|
|00004ad0| 64 65 78 50 61 74 68 22 | 20 69 6e 74 6f 20 78 72 |dexPath"| into xr|
|00004ae0| 65 66 76 61 6c 75 65 0d | 65 6e 64 20 69 66 0d 2d |efvalue.|end if.-|
|00004af0| 2d 0d 65 6c 73 65 0d 62 | 65 65 70 0d 61 6e 73 77 |-.else.b|eep.answ|
|00004b00| 65 72 20 22 58 2d 52 65 | 66 65 72 65 6e 63 65 20 |er "X-Re|ference |
|00004b10| 75 6e 6b 6e 6f 77 6e 20 | 69 6e 20 74 68 69 73 20 |unknown |in this |
|00004b20| 76 65 72 73 69 6f 6e 22 | 0d 65 6e 64 20 69 66 0d |version"|.end if.|
|00004b30| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 65 6e |end if.e|nd if.en|
|00004b40| 64 20 69 66 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |d if.end| if.end |
|00004b50| 69 66 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 69 66 |if.end i|f.end if|
|00004b60| 0d 2d 2d 0d 70 6f 70 20 | 63 61 72 64 0d 75 6e 6c |.--.pop |card.unl|
|00004b70| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 2d 2d 0d 72 65 |ock scre|en.--.re|
|00004b80| 74 75 72 6e 20 78 72 65 | 66 76 61 6c 75 65 0d 65 |turn xre|fvalue.e|
|00004b90| 6e 64 20 66 69 6e 64 78 | 72 65 66 0d 0d 2d 2d 2d |nd findx|ref..---|
|00004ba0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2d |--------|------.-|
|00004bb0| 2d 20 66 69 6e 64 54 65 | 63 68 4e 6f 74 65 20 66 |- findTe|chNote f|
|00004bc0| 75 6e 63 74 69 6f 6e 0d | 2d 2d 2d 2d 2d 2d 2d 2d |unction.|--------|
|00004bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 2d 2d 20 74 68 69 |--------|-.-- thi|
|00004be0| 73 20 66 75 6e 63 74 69 | 6f 6e 20 72 65 74 75 72 |s functi|on retur|
|00004bf0| 6e 73 20 74 68 65 20 63 | 61 72 64 20 6e 75 6d 62 |ns the c|ard numb|
|00004c00| 65 72 20 66 6f 72 20 61 | 20 67 69 76 65 6e 0d 2d |er for a| given.-|
|00004c10| 2d 20 54 65 63 68 6e 69 | 63 61 6c 20 4e 6f 74 65 |- Techni|cal Note|
|00004c20| 20 23 20 6f 72 20 65 6d | 70 74 79 20 69 66 20 6e | # or em|pty if n|
|00004c30| 6f 74 20 66 6f 75 6e 64 | 0d 2d 2d 0d 66 75 6e 63 |ot found|.--.func|
|00004c40| 74 69 6f 6e 20 66 69 6e | 64 54 65 63 68 4e 6f 74 |tion fin|dTechNot|
|00004c50| 65 20 77 68 69 63 68 0d | 67 6c 6f 62 61 6c 20 68 |e which.|global h|
|00004c60| 6f 6d 65 74 6f 0d 70 75 | 74 20 65 6d 70 74 79 20 |ometo.pu|t empty |
|00004c70| 69 6e 74 6f 20 77 68 69 | 63 68 43 61 72 64 0d 6c |into whi|chCard.l|
|00004c80| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 73 65 74 20 6c |ock scre|en.set l|
|00004c90| 6f 63 6b 4d 65 73 73 61 | 67 65 73 20 74 6f 20 74 |ockMessa|ges to t|
|00004ca0| 72 75 65 0d 70 75 73 68 | 20 63 61 72 64 0d 67 6f |rue.push| card.go|
|00004cb0| 20 63 61 72 64 20 69 64 | 20 32 33 39 32 31 20 2d | card id| 23921 -|
|00004cc0| 2d 20 4e 75 6d 62 65 72 | 4c 69 73 74 69 6e 67 0d |- Number|Listing.|
|00004cd0| 69 66 20 77 68 69 63 68 | 20 69 73 20 6e 6f 74 20 |if which| is not |
|00004ce0| 65 6d 70 74 79 20 74 68 | 65 6e 0d 70 75 74 20 74 |empty th|en.put t|
|00004cf0| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 66 69 72 |he numbe|r of fir|
|00004d00| 73 74 20 63 61 72 64 20 | 69 6e 20 62 67 20 22 4d |st card |in bg "M|
|00004d10| 61 69 6e 22 20 69 6e 74 | 6f 20 66 0d 70 75 74 20 |ain" int|o f.put |
|00004d20| 22 30 30 30 22 20 62 65 | 66 6f 72 65 20 77 68 69 |"000" be|fore whi|
|00004d30| 63 68 20 20 20 20 20 2d | 2d 20 61 64 64 20 6c 65 |ch     -|- add le|
|00004d40| 61 64 69 6e 67 20 7a 65 | 72 6f 65 73 20 69 66 20 |ading ze|roes if |
|00004d50| 6e 65 65 64 65 64 0d 64 | 65 6c 65 74 65 20 63 68 |needed.d|elete ch|
|00004d60| 61 72 20 31 20 74 6f 20 | 28 6c 65 6e 67 74 68 28 |ar 1 to |(length(|
|00004d70| 77 68 69 63 68 29 20 2d | 20 33 29 20 6f 66 20 77 |which) -| 3) of w|
|00004d80| 68 69 63 68 0d 69 66 20 | 77 68 69 63 68 20 3d 20 |hich.if |which = |
|00004d90| 22 30 30 30 22 20 74 68 | 65 6e 20 20 20 20 20 20 |"000" th|en      |
|00004da0| 2d 2d 20 73 70 65 63 69 | 61 6c 20 63 61 73 65 20 |-- speci|al case |
|00004db0| 61 74 20 73 74 61 72 74 | 20 6f 66 20 66 69 65 6c |at start| of fiel|
|00004dc0| 64 0d 70 75 74 20 66 20 | 69 6e 74 6f 20 77 68 69 |d.put f |into whi|
|00004dd0| 63 68 43 61 72 64 0d 65 | 6c 73 65 0d 70 75 74 20 |chCard.e|lse.put |
|00004de0| 72 65 74 75 72 6e 20 62 | 65 66 6f 72 65 20 77 68 |return b|efore wh|
|00004df0| 69 63 68 0d 67 65 74 20 | 6f 66 66 73 65 74 28 77 |ich.get |offset(w|
|00004e00| 68 69 63 68 2c 20 63 64 | 20 66 6c 64 20 22 54 4f |hich, cd| fld "TO|
|00004e10| 43 22 29 0d 69 66 20 69 | 74 20 ad 20 30 20 74 68 |C").if i|t . 0 th|
|00004e20| 65 6e 0d 70 75 74 20 73 | 63 72 6f 6c 6c 20 6f 66 |en.put s|croll of|
|00004e30| 20 63 64 20 66 6c 64 20 | 22 54 4f 43 22 20 69 6e | cd fld |"TOC" in|
|00004e40| 74 6f 20 73 0d 73 65 6c | 65 63 74 20 63 68 61 72 |to s.sel|ect char|
|00004e50| 20 28 69 74 2b 31 29 20 | 74 6f 20 28 69 74 2b 32 | (it+1) |to (it+2|
|00004e60| 29 20 6f 66 20 63 64 20 | 66 6c 64 20 22 54 4f 43 |) of cd |fld "TOC|
|00004e70| 22 0d 67 65 74 20 77 6f | 72 64 20 32 20 6f 66 20 |".get wo|rd 2 of |
|00004e80| 74 68 65 20 73 65 6c 65 | 63 74 65 64 4c 69 6e 65 |the sele|ctedLine|
|00004e90| 0d 73 65 74 20 73 63 72 | 6f 6c 6c 20 6f 66 20 63 |.set scr|oll of c|
|00004ea0| 64 20 66 6c 64 20 22 54 | 4f 43 22 20 74 6f 20 73 |d fld "T|OC" to s|
|00004eb0| 0d 70 75 74 20 66 20 2b | 20 69 74 20 2d 20 31 20 |.put f +| it - 1 |
|00004ec0| 69 6e 74 6f 20 77 68 69 | 63 68 43 61 72 64 0d 65 |into whi|chCard.e|
|00004ed0| 6e 64 20 69 66 0d 65 6e | 64 20 69 66 0d 65 6e 64 |nd if.en|d if.end|
|00004ee0| 20 69 66 0d 70 6f 70 20 | 63 61 72 64 0d 2d 2d 0d | if.pop |card.--.|
|00004ef0| 73 65 74 20 6c 6f 63 6b | 4d 65 73 73 61 67 65 73 |set lock|Messages|
|00004f00| 20 74 6f 20 66 61 6c 73 | 65 0d 75 6e 6c 6f 63 6b | to fals|e.unlock|
|00004f10| 20 73 63 72 65 65 6e 0d | 72 65 74 75 72 6e 20 77 | screen.|return w|
|00004f20| 68 69 63 68 43 61 72 64 | 0d 65 6e 64 20 66 69 6e |hichCard|.end fin|
|00004f30| 64 54 65 63 68 4e 6f 74 | 65 0d 0d 0d 2d 2d 20 6d |dTechNot|e...-- m|
|00004f40| 6f 64 69 66 69 65 64 20 | 70 6a 66 20 31 2f 37 2f |odified |pjf 1/7/|
|00004f50| 39 31 0d 67 65 74 20 75 | 73 65 72 6c 65 76 65 6c |91.get u|serlevel|
|00004f60| 0d 69 66 20 69 74 20 69 | 73 20 32 20 74 68 65 6e |.if it i|s 2 then|
|00004f70| 20 73 65 74 20 75 73 65 | 72 6c 65 76 65 6c 20 74 | set use|rlevel t|
|00004f80| 6f 20 31 0d 2d 2d 20 65 | 6e 64 20 6d 6f 64 69 66 |o 1.-- e|nd modif|
|00004f90| 79 20 70 6a 66 20 31 2f | 37 2f 39 31 0d 6f 70 65 |y pjf 1/|7/91.ope|
|00004fa0| 6e 62 61 63 6b 67 72 6f | 75 6e 64 0d 6f 70 65 6e |nbackgro|und.open|
|00004fb0| 63 61 72 64 0d 65 6e 64 | 20 54 72 75 6e 63 46 69 |card.end| TruncFi|
|00004fc0| 6c 65 0d 0d 6f 6e 20 64 | 6f 4d 65 6e 75 20 77 68 |le..on d|oMenu wh|
|00004fd0| 69 63 68 0d 69 66 20 77 | 68 69 63 68 20 69 73 20 |ich.if w|hich is |
|00004fe0| 22 42 61 63 6b 22 20 74 | 68 65 6e 0d 70 6f 70 20 |"Back" t|hen.pop |
|00004ff0| 63 64 0d 65 6c 73 65 0d | 70 61 73 73 20 64 6f 4d |cd.else.|pass doM|
|00005000| 65 6e 75 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 64 |enu.end |if.end d|
|00005010| 6f 4d 65 6e 75 0d 00 73 | 65 20 61 74 20 73 74 61 |oMenu..s|e at sta|
|00005020| 72 74 20 6f 66 20 66 69 | 65 6c 64 0d 70 75 74 20 |rt of fi|eld.put |
|00005030| 66 20 69 6e 74 6f 20 77 | 68 69 63 68 43 61 72 64 |f into w|hichCard|
|00005040| 0d 65 6c 73 65 0d 70 75 | 74 20 72 65 74 75 72 6e |.else.pu|t return|
|00005050| 20 62 65 66 6f 72 65 20 | 77 68 69 63 68 0d 67 65 | before |which.ge|
|00005060| 74 20 6f 66 66 73 65 74 | 28 77 68 69 63 68 2c 20 |t offset|(which, |
|00005070| 63 64 20 66 6c 64 20 22 | 54 4f 43 22 29 0d 69 66 |cd fld "|TOC").if|
|00005080| 20 69 74 20 ad 20 30 20 | 74 68 65 6e 0d 70 75 74 | it . 0 |then.put|
|00005090| 20 73 63 72 6f 6c 6c 20 | 6f 66 20 63 64 20 66 6c | scroll |of cd fl|
|000050a0| 64 20 22 54 4f 43 22 20 | 69 6e 74 6f 20 73 0d 73 |d "TOC" |into s.s|
|000050b0| 65 6c 65 63 74 20 63 68 | 61 72 20 28 69 74 2b 31 |elect ch|ar (it+1|
|000050c0| 29 20 74 6f 20 28 69 74 | 2b 32 29 20 6f 66 20 63 |) to (it|+2) of c|
|000050d0| 64 20 66 6c 64 20 22 54 | 4f 43 22 0d 67 65 74 20 |d fld "T|OC".get |
|000050e0| 77 6f 72 64 20 32 20 6f | 66 20 74 68 65 20 73 65 |word 2 o|f the se|
|000050f0| 6c 65 63 74 65 64 4c 69 | 6e 65 0d 73 65 74 20 73 |lectedLi|ne.set s|
|00005100| 63 72 6f 6c 6c 20 6f 66 | 20 63 64 20 66 6c 64 20 |croll of| cd fld |
|00005110| 22 54 4f 43 22 20 74 6f | 20 73 0d 70 75 74 20 66 |"TOC" to| s.put f|
|00005120| 20 2b 20 69 74 20 2d 20 | 31 20 69 6e 74 6f 20 77 | + it - |1 into w|
|00005130| 68 69 63 68 43 61 72 64 | 0d 65 6e 64 20 69 66 0d |hichCard|.end if.|
|00005140| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 70 6f |end if.e|nd if.po|
|00005150| 70 20 63 61 72 64 0d 2d | 2d 0d 73 65 74 20 6c 6f |p card.-|-.set lo|
|00005160| 63 6b 4d 65 73 73 61 67 | 65 73 20 74 6f 20 66 61 |ckMessag|es to fa|
|00005170| 6c 73 65 0d 75 6e 6c 6f | 63 6b 20 73 63 72 65 65 |lse.unlo|ck scree|
|00005180| 6e 0d 72 65 74 75 72 6e | 20 77 68 69 63 68 43 61 |n.return| whichCa|
|00005190| 72 64 0d 65 6e 64 20 66 | 69 6e 64 54 65 63 68 4e |rd.end f|indTechN|
|000051a0| 6f 74 65 0d 0d 0d 2d 2d | 20 6d 6f 64 69 66 69 65 |ote...--| modifie|
|000051b0| 64 20 70 6a 66 20 31 2f | 37 2f 39 31 0d 67 65 74 |d pjf 1/|7/91.get|
|000051c0| 20 75 73 65 72 6c 65 76 | 65 6c 0d 69 66 20 69 74 | userlev|el.if it|
|000051d0| 20 69 73 20 32 20 74 68 | 65 6e 20 73 65 74 20 75 | is 2 th|en set u|
|000051e0| 73 65 72 6c 65 76 65 6c | 20 74 6f 20 31 0d 2d 2d |serlevel| to 1.--|
|000051f0| 20 65 6e 64 20 6d 6f 64 | 69 66 79 20 70 6a 66 20 | end mod|ify pjf |
|00005200| 00 00 06 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00005210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005220| 00 8c 0e 2b 00 21 5a 1f | 00 08 06 97 00 32 a0 0b |...+.!Z.|.....2..|
|00005230| 00 ad 96 53 00 1d 09 1d | 00 1e 3e f1 00 09 d7 27 |...S....|..>....'|
|00005240| 00 1e 79 5a 00 1e b8 f8 | 00 1e f4 cb 00 1f 33 56 |..yZ....|......3V|
|00005250| 00 1f b3 04 00 20 2d f6 | 00 e7 1a cc 00 e8 51 93 |..... -.|......Q.|
|00005260| 00 ea 18 23 00 21 be e6 | 00 21 d2 33 00 21 e2 06 |...#.!..|.!.3.!..|
|00005270| 00 21 f5 8a 00 22 09 c2 | 00 21 7b 1a 00 22 9b 41 |.!..."..|.!{..".A|
|00005280| 00 23 e5 35 00 25 6c 54 | 00 25 83 fc 00 25 f5 ea |.#.5.%lT|.%...%..|
|00005290| 00 26 54 7c 00 26 9e 7a | 00 eb a1 b7 00 8f 39 e5 |.&T|.&.z|......9.|
|000052a0| 00 27 34 e8 00 27 a1 06 | 00 28 34 d5 00 28 84 4c |.'4..'..|.(4..(.L|
|000052b0| 00 28 a2 e5 00 28 ee fd | 00 29 ff 0f 00 2a 10 37 |.(...(..|.)...*.7|
|000052c0| 00 2a e9 15 00 2a fb d8 | 00 2b 34 3f 00 2b 48 f4 |.*...*..|.+4?.+H.|
|000052d0| 00 2b 7e 94 00 2d 58 7d | 00 2d 91 09 00 8f 7c 71 |.+~..-X}|.-....|q|
|000052e0| 00 ae 01 e3 00 2d a2 31 | 00 2e 49 ee 00 2e 59 07 |.....-.1|..I...Y.|
|000052f0| 00 2e a3 31 00 31 77 46 | 00 32 47 cc 00 32 6c 08 |...1.1wF|.2G..2l.|
|00005300| 00 22 40 eb 00 32 bc e5 | 00 33 57 e7 00 33 68 88 |."@..2..|.3W..3h.|
|00005310| 00 0d 45 7e 00 34 41 20 | 00 1c f2 5a 00 34 8e 66 |..E~.4A |...Z.4.f|
|00005320| 00 34 9f 18 00 34 b1 dc | 00 90 65 7c 00 34 dd ff |.4...4..|..e|.4..|
|00005330| 00 34 f4 3a 00 35 05 04 | 00 35 1c 52 00 35 31 8b |.4.:.5..|.5.R.51.|
|00005340| 00 09 f6 78 00 35 43 80 | 00 35 9a a3 01 06 0c 15 |...x.5C.|.5......|
|00005350| 00 36 0c d3 00 36 4e ec | 00 15 30 5e 00 65 a3 ea |.6...6N.|..0^.e..|
|00005360| 00 37 57 2a 00 38 28 0e | 00 42 b3 17 00 0a 15 a1 |.7W*.8(.|.B......|
|00005370| 00 0c 08 a5 00 11 ed 71 | 00 38 84 11 00 39 32 c7 |.......q|.8...92.|
|00005380| 00 3b 09 65 00 3c 1e 3c | 00 21 9d 7f 00 3c 44 e9 |.;.e.<.<|.!...<D.|
|00005390| 00 3c e0 c8 00 3c f6 77 | 00 3e 8d 6b 01 10 ea db |.<...<.w|.>.k....|
|000053a0| 00 40 44 cd 00 40 a1 61 | 00 41 87 e1 00 42 10 46 |.@D..@.a|.A...B.F|
|000053b0| 00 41 fa 61 00 42 56 72 | 00 26 f8 16 00 44 00 6c |.A.a.BVr|.&...D.l|
|000053c0| 00 44 23 e5 00 45 92 6a | 00 6f 5a f4 00 45 a3 d3 |.D#..E.j|.oZ..E..|
|000053d0| 00 45 b7 16 00 4a 03 20 | 00 47 be c8 00 4a e0 ad |.E...J. |.G...J..|
|000053e0| 00 4b 85 0c 00 4b ca bd | 00 4f 0c 27 00 51 5b 06 |.K...K..|.O.'.Q[.|
|000053f0| 00 51 6b 73 00 51 7b 29 | 00 51 8d 9c 00 51 dc d4 |.Qks.Q{)|.Q...Q..|
|00005400| 00 52 bf f5 00 54 1f 84 | 00 6f 93 fd 00 54 65 11 |.R...T..|.o...Te.|
|00005410| 00 54 d2 50 00 55 03 b5 | 00 55 43 4d 00 55 7a 50 |.T.P.U..|.UCM.UzP|
|00005420| 00 55 f1 76 00 d6 ca 34 | 00 56 1e 96 00 56 3e d4 |.U.v...4|.V...V>.|
|00005430| 00 56 56 fd 00 56 a6 81 | 00 56 c9 7f 00 57 40 8e |.VV..V..|.V...W@.|
|00005440| 00 58 03 dd 00 5a 6e fb | 00 6f e1 14 00 5e d4 5e |.X...Zn.|.o...^.^|
|00005450| 00 5e f0 a5 00 ee ef 07 | 00 60 b0 36 00 60 f7 33 |.^......|.`.6.`.3|
|00005460| 00 61 3d 53 00 61 c4 89 | 00 61 e9 bf 00 ef c5 fb |.a=S.a..|.a......|
|00005470| 00 63 f1 b8 00 64 27 c6 | 00 7c 67 3f 00 ae 7e d9 |.c...d'.|.|g?..~.|
|00005480| 00 66 98 4c 00 66 b3 f4 | 00 70 3b f7 00 67 35 49 |.f.L.f..|.p;..g5I|
|00005490| 00 67 bb 78 00 67 e9 f6 | 00 6a 66 f6 00 6c 54 d3 |.g.x.g..|.jf..lT.|
|000054a0| 00 70 6c a2 00 70 b0 f1 | 00 92 7b c0 00 70 e3 a2 |.pl..p..|..{..p..|
|000054b0| 00 71 41 73 01 10 ed b4 | 00 72 5b ce 00 72 75 82 |.qAs....|.r[..ru.|
|000054c0| 00 73 68 60 00 73 9c ba | 00 73 d0 2e 00 74 2a 08 |.sh`.s..|.s...t*.|
|000054d0| 00 74 3a f0 00 74 89 9b | 00 75 36 40 00 75 f0 19 |.t:..t..|.u6@.u..|
|000054e0| 00 77 2a c1 00 77 63 ca | 00 92 c5 35 00 78 23 77 |.w*..wc.|...5.x#w|
|000054f0| 00 78 b4 e7 00 7a 0c a2 | 00 7a 6a 70 00 87 32 67 |.x...z..|.zjp..2g|
|00005500| 00 7f cf 9a 00 7f de a2 | 00 80 8c 21 00 80 bf 3d |........|...!...=|
|00005510| 00 81 04 42 00 81 5a b6 | 00 81 a9 62 00 83 88 59 |...B..Z.|...b...Y|
|00005520| 00 83 a3 9d 00 91 16 c9 | 00 93 a6 6a 00 85 1f 20 |........|...j... |
|00005530| 00 85 57 7c 00 85 c3 21 | 00 86 6f e0 00 a7 d2 b7 |..W|...!|..o.....|
|00005540| 00 89 81 6a 00 89 ca 86 | 00 ae b3 64 00 97 a4 c8 |...j....|...d....|
|00005550| 00 0d 69 d6 00 98 de 08 | 00 98 ad fe 00 02 c0 50 |..i.....|.......P|
|00005560| 00 f1 93 2e 00 16 d8 99 | 00 93 c3 f3 00 aa 1c 9b |........|........|
|00005570| 00 95 2d 2b 00 95 6b ca | 00 02 c6 af 00 8c 2a c2 |..-+..k.|......*.|
|00005580| 00 98 1d aa 00 af 21 d4 | 00 be 0e f1 00 99 33 2d |......!.|......3-|
|00005590| 00 99 d9 05 00 9b 8c 58 | 00 1f c6 d2 01 10 f0 1c |.......X|........|
|000055a0| 00 c5 88 d0 00 9b af f5 | 00 9e f7 6b 00 9f 18 d6 |........|...k....|
|000055b0| 00 9f a6 88 00 0e 16 90 | 00 c7 c3 75 00 c8 a5 da |........|...u....|
|000055c0| 00 c9 b3 aa 00 5d 12 63 | 00 ce c1 ec 00 cf bb 34 |.....].c|.......4|
|000055d0| 00 a1 d5 07 00 f3 0a a5 | 00 f3 db 54 00 5f 05 0b |........|...T._..|
|000055e0| 00 f7 6a 18 00 16 db b4 | 00 62 3f 40 00 a6 30 e5 |..j.....|.b?@..0.|
|000055f0| 00 1c b4 4e 00 b3 68 a7 | 00 a2 14 6d 00 a8 b7 33 |...N..h.|...m...3|
|00005600| 00 a9 22 f3 00 a9 73 e5 | 00 03 06 ab 00 83 bf e4 |.."...s.|........|
|00005610| 00 d1 4b ac 00 f7 aa c2 | 00 ab 8e 0c 00 ac b3 02 |..K.....|........|
|00005620| 00 ad 67 3a 00 93 f1 97 | 00 ac f8 b8 00 b0 35 fb |..g:....|......5.|
|00005630| 00 b0 72 6a 00 b0 cc c9 | 00 b1 21 bc 00 b1 56 d0 |..rj....|..!...V.|
|00005640| 00 b2 64 fc 00 b3 04 78 | 00 d3 2b e9 00 c1 d2 6d |..d....x|..+....m|
|00005650| 00 03 46 ba 00 b8 8e 45 | 00 b5 21 37 00 db fc 52 |..F....E|..!7...R|
|00005660| 00 dc 32 7a 00 dc b8 2e | 00 b8 df 1d 00 b9 63 28 |..2z....|......c(|
|00005670| 00 ba 22 67 00 ba d5 09 | 00 bd c0 32 00 dd 79 07 |.."g....|...2..y.|
|00005680| 00 bf 52 eb 00 bf be 30 | 00 de 8d d2 00 c5 ce f5 |..R....0|........|
|00005690| 00 c2 2e 14 00 c2 de 78 | 00 03 86 b8 00 c7 09 6d |.......x|.......m|
|000056a0| 00 1c b1 d1 00 13 64 1d | 00 3e da a0 00 ca 0b 3d |......d.|.>.....=|
|000056b0| 00 cb 80 23 00 ce 63 72 | 00 56 02 c8 00 71 60 b7 |...#..cr|.V...q`.|
|000056c0| 00 96 57 5a 00 a3 74 8e | 00 b6 92 8d 00 d0 19 f5 |..WZ..t.|........|
|000056d0| 00 df 69 d7 00 df b3 dd | 00 e0 ea fa 00 e1 51 75 |..i.....|......Qu|
|000056e0| 00 e3 b7 64 00 e5 71 db | 00 e6 73 81 00 03 c6 f9 |...d..q.|..s.....|
|000056f0| 00 04 06 77 00 04 46 85 | 00 04 86 7c 00 f7 f6 fd |...w..F.|...|....|
|00005700| 01 10 fa d5 00 04 c6 c8 | 00 11 9a ba 00 05 06 89 |........|........|
|00005710| 00 da 51 12 00 f8 88 3d | 00 fc 22 bf 00 ff 3f f6 |..Q....=|.."...?.|
|00005720| 01 02 5c eb 01 03 90 ae | 01 03 e3 56 01 05 94 a0 |..\.....|...V....|
|00005730| 01 09 66 01 01 09 d1 6e | 01 0a b6 fb 01 0c 5f e4 |..f....n|......_.|
|00005740| 00 05 46 68 01 0d 4c f3 | 01 0d e7 89 01 0e 12 49 |..Fh..L.|.......I|
|00005750| 01 0e 50 2f 01 0f c1 25 | 00 00 00 00 00 00 00 00 |..P/...%|........|
|00005760| 00 05 86 31 00 05 c6 fb | 00 06 06 2d 00 06 46 5e |...1....|...-..F^|
|00005770| 00 06 86 f7 00 06 c6 a6 | 00 07 06 7d 00 07 46 d5 |........|...}..F.|
|00005780| 00 07 86 e3 00 07 c6 79 | 00 00 00 00 00 00 00 00 |.......y|........|
|00005790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000057a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000057b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000057c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000057d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000057e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000057f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005800| 00 00 00 c0 4c 49 53 54 | 00 00 d7 50 00 00 00 00 |....LIST|...P....|
|00005810| 00 00 00 15 00 00 08 00 | 00 00 01 35 00 84 00 02 |........|...5....|
|00005820| 00 20 00 04 68 71 21 98 | 00 00 01 35 00 00 00 00 |. ..hq!.|...5....|
|00005830| 00 00 de af 00 0f 00 01 | 02 ab 00 0f 00 01 14 ba |........|........|
|00005840| 00 0f 00 01 26 b8 00 0f | 00 01 3b f9 00 0f 00 01 |....&...|..;.....|
|00005850| 3c 77 00 0f 00 01 3d 85 | 00 0f 00 01 3e 7c 00 0f |<w....=.|....>|..|
|00005860| 00 01 41 c8 00 0f 00 01 | 43 89 00 0f 00 01 50 68 |..A.....|C.....Ph|
|00005870| 00 0f 00 01 58 31 00 0f | 00 01 59 fb 00 0f 00 01 |....X1..|..Y.....|
|00005880| 5a 2d 00 0f 00 01 5b 5e | 00 0f 00 01 5c f7 00 0f |Z-....[^|....\...|
|00005890| 00 01 5d a6 00 0f 00 01 | 5e 7d 00 0f 00 01 5f d5 |..].....|^}...._.|
|000058a0| 00 0f 00 01 60 e3 00 0f | 00 01 61 79 00 09 00 00 |....`...|..ay....|
|000058b0| 00 00 6f 6e 74 20 77 68 | 65 6e 20 62 61 63 6b 67 |..ont wh|en backg|
|000058c0| 00 00 08 00 50 41 47 45 | 00 00 de af 00 00 00 00 |....PAGE|........|
|000058d0| 00 00 d7 50 10 33 34 3b | 00 00 d4 d6 e0 00 00 00 |...P.34;|........|
|000058e0| 02 02 00 04 00 08 90 00 | 40 04 00 00 00 02 10 00 |........|@.......|
|000058f0| 40 01 80 00 05 00 20 00 | 80 50 01 04 00 00 00 80 |@..... .|.P......|
|00005900| 00 10 40 08 40 04 00 02 | 00 00 00 12 00 00 04 00 |..@.@...|........|
|00005910| 00 00 00 00 00 00 00 08 | 80 02 04 04 80 00 18 00 |........|........|
|00005920| 20 02 40 11 28 20 00 00 | 08 80 20 00 10 00 00 11 | .@.( ..|.. .....|
|00005930| 00 82 01 00 04 02 00 00 | 00 10 00 00 00 14 00 00 |........|........|
|00005940| 00 00 00 00 01 00 02 82 | 00 22 40 20 00 01 00 00 |........|."@ ....|
|00005950| 10 00 00 00 00 00 00 28 | 00 40 08 00 00 01 40 d5 |.......(|.@....@.|
|00005960| a0 00 10 00 00 1a 00 00 | 08 08 08 92 25 00 14 02 |........|....%...|
|00005970| 40 00 90 14 40 00 00 00 | 80 80 01 00 01 08 00 00 |@...@...|........|
|00005980| 08 00 00 08 00 00 08 00 | 02 10 00 08 00 04 14 14 |........|........|
|00005990| 00 04 00 01 00 00 00 00 | 00 00 00 08 00 40 04 04 |........|.....@..|
|000059a0| 03 00 09 28 21 c8 44 12 | 20 31 0d 04 00 7d 10 10 |...(!.D.| 1...}..|
|000059b0| 05 40 00 10 10 a2 01 80 | 81 00 40 10 54 08 00 00 |.@......|..@.T...|
|000059c0| 04 04 01 80 00 00 00 02 | 02 00 90 01 00 20 08 00 |........|..... ..|
|000059d0| 80 04 44 00 20 0a 10 08 | 00 00 00 18 00 a0 18 00 |..D. ...|........|
|000059e0| 00 00 5d 71 e0 7f ff ff | ff ff ff ff ff ff ff ff |..]q....|........|
|000059f0| ff 7f ff f7 ff ff bf ff | ff ff ff ff ff ff ff ff |........|........|
|00005a00| ff ff ff ff ff ff ff fb | ff ff ef ff ff ff ff ff |........|........|
|00005a10| ff bf ff ff ff ff ff f7 | ff ff 7f ff ef ff ff ff |........|........|
|00005a20| ff ff ff ff bf ff ff ef | ff ff ff ff ff ff ff ff |........|........|
|00005a30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff fe ff |........|........|
|00005a50| ff ff ff fd ff fd ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a60| df ff ff fc 00 01 29 1d | a0 7f ff ff ff ff ff ff |......).|........|
|00005a70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a90| ff ff ff ff ff bf ff ff | ff ff ff f7 ff ff ff ff |........|........|
|00005aa0| ff ff ff ff ff ff ff ff | bf ff ff ff ff ff ff ff |........|........|
|00005ab0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005ac0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005ad0| ff ff ff ff ff ff ff fd | ff ff ff ff ff ff ff ff |........|........|
|00005ae0| ff ff ff ff ff ff ff fc | 00 00 56 5e a0 7f ff ff |........|..V^....|
|00005af0| ff ff ff ff ff ff ff ff | ff 7f ff ff ff ff ff ff |........|........|
|00005b00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff fe ff |........|........|
|00005b10| ff ff ff ff ff ff ff ff | ff bf ff ff ff ff ff f7 |........|........|
|00005b20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005b30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005b40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005b50| ff ff ff ff ff ff ff ff | ff ff ff fd ff ff ff ff |........|........|
|00005b60| ff ff ff ff ff ff ff ff | ff ff ff fc 00 00 f9 b4 |........|........|
|00005b70| a0 7f ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005b80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005b90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005ba0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005bb0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005bc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005bd0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005be0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff fc |........|........|
|00005bf0| 00 00 fc 4e 60 00 96 ad | df 12 88 58 58 3b 8f 51 |...N`...|...XX;.Q|
|00005c00| 39 49 4e 89 ec 3a 86 5d | 64 25 eb 32 59 f4 2f 77 |9IN..:.]|d%.2Y./w|
|00005c10| ed cf 07 1c 3f ef 26 8b | 2e b0 62 b5 cf d8 4a ab |....?.&.|..b...J.|
|00005c20| fe ef d6 e8 ac 2d ae 1a | 8b d1 39 1f 77 26 28 c5 |.....-..|..9.w&(.|
|00005c30| af 5f d6 f1 82 a6 4f 62 | fd 76 e4 fb e6 c3 cf 52 |._....Ob|.v.....R|
|00005c40| 65 79 95 05 8b 6b c6 b4 | 0c b7 47 c7 db 14 c2 f6 |ey...k..|..G.....|
|00005c50| db e9 3e c0 28 74 ac e8 | a1 bf 8c 61 03 18 eb 8b |..>.(t..|...a....|
|00005c60| df 33 cd 76 88 71 54 7b | bb cb 36 42 32 a0 a0 6b |.3.v.qT{|..6B2..k|
|00005c70| 4a f7 86 10 00 00 46 5a | a0 64 04 90 88 01 00 41 |J.....FZ|.d.....A|
|00005c80| 60 42 01 00 01 22 a1 81 | 01 02 10 20 14 82 01 12 |`B..."..|... ....|
|00005c90| 50 22 80 04 a8 e1 24 04 | 0b 8c 08 41 20 00 00 44 |P"....$.|...A ..D|
|00005ca0| 8a 40 0e 87 ca 2b c0 10 | 82 08 94 02 00 00 50 00 |.@...+..|......P.|
|00005cb0| 44 35 00 1d 09 11 41 14 | 44 80 80 49 68 74 a8 13 |D5....A.|D..Iht..|
|00005cc0| 00 0c 01 01 51 88 00 ca | 02 08 01 28 80 20 03 94 |....Q...|...(. ..|
|00005cd0| 61 10 42 13 40 4a 48 04 | 00 04 68 91 60 06 01 44 |a.B.@JH.|..h.`..D|
|00005ce0| 00 10 e0 08 82 20 02 00 | 04 40 00 7a 80 18 50 00 |..... ..|.@.z..P.|
|00005cf0| 00 00 00 58 70 98 18 00 | 00 00 0d 1d a0 7f f5 bf |...Xp...|........|
|00005d00| ff ff ff 7f 6f bf 9f ff | fd ff fd b7 ef 7e 1f ff |....o...|.....~..|
|00005d10| ff ef ff ff d7 6b 7f ff | ff fd ff bf ff bf ee ff |.....k..|........|
|00005d20| fe ff ef ff ef ff ff ff | f6 ee dd fb ff ff de ff |........|........|
|00005d30| 7f fd ff ff ff 7e 59 7d | 7d ff fd fd ff f7 ff ff |.....~Y}|}.......|
|00005d40| ff 7f ff f7 ff e5 ff ff | f7 ff ff df ff ff df ff |........|........|
|00005d50| f3 ff e7 de ff df ee bf | de ff fc e6 bd ff ff ff |........|........|
|00005d60| eb ff ff 5f 77 ff fb 5b | df fe ff df ef 7e fe fb |..._w..[|.....~..|
|00005d70| f9 fe fe ff f9 ff 97 7b | ff ff 1f 7c 00 00 0e f1 |.......{|...|....|
|00005d80| a0 25 a4 a2 81 17 18 0d | 09 3a 05 10 6d 37 e5 61 |.%......|.:..m7.a|
|00005d90| 2c 2f 19 71 44 28 6d 66 | d9 40 25 5c e9 69 1c 91 |,/.qD(mf|.@%\.i..|
|00005da0| 8d 6f 0c 28 a8 92 ec 1c | ce 1e 5b af 86 0a c2 90 |.o.(....|..[.....|
|00005db0| 92 d3 c6 17 96 24 39 b4 | 07 3c e8 4d f8 13 c6 36 |.....$9.|.<.M...6|
|00005dc0| ef 6c ec cb 31 f4 64 13 | 47 8e 7f 3a d5 8c 07 9b |.l..1.d.|G..:....|
|00005dd0| 8b 5a cd 79 80 bd c7 d5 | d0 1d 62 c7 5e 49 50 06 |.Z.y....|..b.^IP.|
|00005de0| 25 1c f2 d9 24 57 a0 61 | b7 50 e0 42 42 94 4f 40 |%...$W.a|.P.BB.O@|
|00005df0| 02 50 04 1b a0 48 66 40 | 00 04 14 18 dc 58 58 14 |.P...Hf@|.....XX.|
|00005e00| 00 00 10 5a a0 14 ae 90 | 1d 0f b8 5e 5b 22 dd 93 |...Z....|...^["..|
|00005e10| f5 7e fd 05 4d 77 5b 1c | ed 28 e1 32 c2 63 08 e7 |.~..Mw[.|.(.2.c..|
|00005e20| e9 e1 35 d0 6f 2f b6 eb | ed 95 cc 54 ae b7 7a 3f |..5.o/..|...T..z?|
|00005e30| ee 1f e6 d0 cb 62 ce 62 | b7 a4 38 7c e6 3d 08 45 |.....b.b|..8|.=.E|
|00005e40| 29 51 cc f8 fb 0c f9 c5 | dd fe 7c b7 f7 6c 2d f0 |)Q......|..|..l-.|
|00005e50| 57 88 a5 d6 0a cf ff 3d | eb 46 2f f4 69 81 aa 15 |W......=|.F/.i...|
|00005e60| 5e f9 ec 96 ad 74 66 b5 | 66 be 25 71 df 05 88 82 |^....tf.|f.%q....|
|00005e70| 83 b2 6b 34 c7 5c 14 9a | b9 8f e4 1b 5a d5 ed 4d |..k4.\..|....Z..M|
|00005e80| e7 fa 19 74 00 00 11 f8 | a0 14 21 a5 93 01 97 16 |...t....|..!.....|
|00005e90| 4a 20 0a 96 b5 26 c1 10 | 48 3f 19 a9 8c 28 85 22 |J ...&..|H?...(."|
|00005ea0| 72 72 06 49 68 4d 2f e8 | 69 8d 9e 88 40 a3 ff c4 |rr.IhM/.|i...@...|
|00005eb0| aa c4 5a ee ce 06 ee 5b | 90 41 8c 10 b3 a0 73 d0 |..Z....[|.A....s.|
|00005ec0| 41 32 28 0c 18 33 c4 5d | 42 74 c8 41 fd fc 44 13 |A2(..3.]|Bt.A..D.|
|00005ed0| ae 04 0f e1 d1 ac a4 96 | 43 8d a7 30 ab 35 4f 24 |........|C..0.5O$|
|00005ee0| d4 99 b0 a7 40 fa da e6 | 81 34 f0 89 64 86 a4 75 |....@...|.4..d..u|
|00005ef0| 4e 50 80 0b 90 88 6f 58 | 8c 4c 32 78 9b 9c 57 8a |NP....oX|.L2x..W.|
|00005f00| 4c 15 09 09 73 38 29 40 | 00 00 12 cb a0 15 cc 8c |L...s8)@|........|
|00005f10| 81 33 0d 6b 69 28 01 14 | e9 27 8d 80 42 22 15 1c |.3.ki(..|.'..B"..|
|00005f20| 6c 68 87 aa da 73 05 f9 | fb e9 77 5c 9d ad 86 08 |lh...s..|..w\....|
|00005f30| 92 04 cc cd 8f 59 4b ac | ee 82 cc 90 88 77 0e 34 |.....YK.|.....w.4|
|00005f40| 22 00 f0 10 64 7c 29 1f | 48 09 54 56 c4 64 eb 6b |"...d|).|H.TV.d.k|
|00005f50| f1 77 10 c3 af 89 4d 58 | 5d 98 b7 9b 0b 4e 85 bc |.w....MX|]....N..|
|00005f60| a2 3b ee 9a e0 10 40 d6 | 54 fc 18 04 a8 55 4f ac |.;....@.|T....UO.|
|00005f70| 22 4e e4 48 c2 10 90 08 | 20 14 61 08 8c 04 a4 19 |"N.H....| .a.....|
|00005f80| a9 4a d5 02 0b 03 35 59 | 6c 98 5d 18 00 00 13 56 |.J....5Y|l.]....V|
|00005f90| a0 7d 8b bb 6f 5f d9 f4 | c6 3e 8d 9f ff 7e 7d 16 |.}..o_..|.>...~}.|
|00005fa0| cf 73 9d bf fe 7f e3 bf | d3 f9 2c 77 fb cf 7d dc |.s......|..,w..}.|
|00005fb0| ef ff ae fa fc 5d ff d7 | e7 fe ff bf ef 8e de fb |.....]..|........|
|00005fc0| bc 43 d6 51 3f 54 ff 7d | ef b7 39 df 98 7e ce ff |.C.Q?T.}|..9..~..|
|00005fd0| fb 5c fd eb fd ff 50 f7 | ff ff df 47 bf f8 37 96 |.\....P.|...G..7.|
|00005fe0| ee cf d7 7f fc fd 77 c7 | fc fc f6 ff 5e fe e0 b9 |......w.|....^...|
|00005ff0| ad fc f3 bc e6 ec e5 79 | d7 f9 d3 fb d9 5e ff 67 |.......y|.....^.g|
|00006000| ee 55 fc fd f9 db f7 72 | 5b c4 e1 7f 9f fe 5f fc |.U.....r|[....._.|
|00006010| 00 00 14 04 a0 04 02 00 | 00 01 80 55 20 00 a0 00 |........|...U ...|
|00006020| 01 26 81 00 82 1a 10 00 | 04 03 01 48 83 21 02 00 |.&......|...H.!..|
|00006030| c0 40 00 74 48 8a 0a 80 | c0 10 48 10 0a 40 02 c0 |.@.tH...|..H..@..|
|00006040| c0 0a 84 00 00 00 40 00 | 00 00 50 00 20 20 00 14 |......@.|..P.  ..|
|00006050| 00 00 04 18 06 20 40 09 | 00 76 42 56 00 88 d1 00 |..... @.|.vBV....|
|00006060| 01 88 04 82 08 09 01 18 | 80 20 03 90 60 00 00 10 |........|. ..`...|
|00006070| c4 42 00 04 20 14 58 80 | 22 04 00 04 40 00 80 08 |.B.. .X.|"...@...|
|00006080| 00 04 02 80 04 00 00 5a | 00 48 10 08 01 04 00 28 |.......Z|.H.....(|
|00006090| 60 d9 00 08 00 00 00 00 | 00 00 00 00 00 00 00 00 |`.......|........|
|000060a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060c0| 00 00 08 00 50 41 47 45 | 00 01 02 ab 00 00 00 00 |....PAGE|........|
|000060d0| 00 00 d7 50 7a e9 bc 2f | 00 00 e6 d2 a0 15 fe eb |...Pz../|........|
|000060e0| cd 72 bb 5d 5b 7b 09 1a | a7 57 dd 1b cf 3f 37 0e |.r.][{..|.W...?7.|
|000060f0| df e6 ff ef fb 66 3f ff | ff 6f 7f d9 5f ef 96 8f |.....f?.|.o.._...|
|00006100| aa a6 cf 34 cf ff 78 fd | f7 de cc d4 cc 72 ee 36 |...4..x.|.....r.6|
|00006110| 36 64 de 35 6d b6 9c 5f | df db f6 55 b7 7f f4 d7 |6d.5m.._|...U....|
|00006120| f7 7e ce b7 85 ef df 7f | 15 b8 27 bc 42 5f 9f fe |.~......|..'.B_..|
|00006130| a1 7d 3b dc e6 fd d2 ff | f6 fd 4c e6 ad 7c fb f8 |.};.....|..L..|..|
|00006140| 6e fc e5 d9 47 78 f8 18 | db 4e cd d3 ac f6 74 7f |n...Gx..|.N....t.|
|00006150| 79 dd 54 4e e8 c6 b9 6e | fb df 1f dc 00 00 15 f6 |y.TN...n|........|
|00006160| a0 15 25 19 17 bb fd 5e | 6b 20 df 1f 7f ee 5f 3e |..%....^|k ...._>|
|00006170| ff f7 79 6b 6c ef 2d ee | fc ed 2f cf eb f9 ff 4c |..ykl.-.|../....L|
|00006180| 4d ac 1f 8b a5 4a fc 11 | ef df 5f 6f e3 8f c4 fa |M....J..|.._o....|
|00006190| 62 6b 3f a1 c5 31 dc 74 | 7c 2a 5c a4 6e f2 df f6 |bk?..1.t||*\.n...|
|000061a0| 67 f8 ea eb d3 7d f7 fb | 6c 47 dd 33 d3 7f 2f a7 |g....}..|lG.3../.|
|000061b0| 66 c9 c3 fb b7 fe 57 9c | de 56 7b fc fe 7f 4e e6 |f.....W.|.V{...N.|
|000061c0| ac fd eb db e7 d7 05 69 | 17 73 da 1a 97 24 6f f2 |.......i|.s...$o.|
|000061d0| 2e 5c be b9 c9 29 dd 4e | 98 eb 88 6e 78 f8 5e 9c |.\...).N|...nx.^.|
|000061e0| 00 00 09 1f 20 25 82 00 | 01 0b 90 52 68 12 0d 12 |.... %..|...Rh...|
|000061f0| 44 77 07 11 c9 31 c0 58 | 58 60 4d 22 d0 20 01 e6 |Dw...1.X|X`M". ..|
|00006200| e1 ef 04 0c 8a 89 02 0b | 0c 04 58 61 4a 30 4a 0a |........|..XaJ0J.|
|00006210| e1 c6 96 80 80 41 ea 12 | 20 00 19 45 e0 0a a8 60 |.....A..| ..E...`|
|00006220| 48 40 34 11 00 10 48 09 | c5 70 20 32 25 48 2d 00 |H@4...H.|.p 2%H-.|
|00006230| 41 18 06 02 00 02 01 08 | 84 24 88 08 52 0b 48 82 |A.......|.$..R.H.|
|00006240| 59 c9 08 82 60 64 22 00 | 00 45 00 60 07 54 c2 00 |Y...`d".|.E.`.T..|
|00006250| aa 29 c8 20 04 53 a5 93 | 20 0d 24 00 08 21 84 48 |.). .S..| .$..!.H|
|00006260| 80 20 14 50 00 00 1e 1a | 20 27 82 00 01 0b 90 52 |. .P....| '.....R|
|00006270| 68 12 0d 12 44 77 07 11 | c9 33 c8 58 58 60 4d 22 |h...Dw..|.3.XX`M"|
|00006280| d0 20 01 e6 e1 ef 04 0c | 8a 89 02 09 0c 04 58 61 |. ......|......Xa|
|00006290| 4a 30 4a 0a e1 c6 96 88 | 00 41 ea 12 00 00 19 45 |J0J.....|.A.....E|
|000062a0| e0 0a a8 60 68 48 34 11 | 00 10 48 09 c1 70 20 32 |...`hH4.|..H..p 2|
|000062b0| 25 48 2d 00 d1 18 06 02 | 00 02 01 18 84 a4 88 08 |%H-.....|........|
|000062c0| 52 0b 4c a2 59 c9 08 82 | 60 64 a0 00 04 4d 00 60 |R.L.Y...|`d...M.`|
|000062d0| 07 54 c2 00 ab 29 d8 20 | 84 53 a5 93 00 0d 24 00 |.T...). |.S....$.|
|000062e0| 00 21 84 48 80 20 14 50 | 00 00 62 7f 20 27 82 00 |.!.H. .P|..b. '..|
|000062f0| 01 0b 90 52 68 12 0d 12 | 04 77 07 11 c9 31 e0 48 |...Rh...|.w...1.H|
|00006300| 58 60 4d 22 d0 20 01 e6 | e1 ef 04 0c 8a 89 02 09 |X`M". ..|........|
|00006310| 0c 00 58 61 4a 30 4a 0a | e1 c6 94 88 00 40 ea 12 |..XaJ0J.|.....@..|
|00006320| 00 00 18 45 a0 02 a8 60 | 48 c8 34 11 00 10 48 09 |...E...`|H.4...H.|
|00006330| e1 70 20 32 24 48 2d 00 | d1 18 26 02 00 0a 81 18 |.p 2$H-.|..&.....|
|00006340| 84 b4 88 08 52 03 4c 20 | 59 d9 08 82 e0 64 a0 20 |....R.L |Y....d. |
|00006350| 00 4d 00 60 07 54 ca 00 | ab 29 d8 20 84 53 a5 93 |.M.`.T..|.). .S..|
|00006360| 80 0d 24 00 00 21 80 48 | 80 20 14 50 00 00 19 e6 |..$..!.H|. .P....|
|00006370| a0 04 04 09 40 01 00 41 | 20 20 00 00 60 62 89 10 |....@..A|  ..`b..|
|00006380| 02 02 02 19 10 40 09 2a | c0 61 00 98 a0 49 01 0a |.....@.*|.a...I..|
|00006390| 88 8c 02 05 00 00 88 00 | 8a 40 0a ab c0 0b 84 10 |........|.@......|
|000063a0| 00 00 00 80 00 00 10 00 | 04 2c 40 18 08 08 00 14 |........|.,@.....|
|000063b0| 05 40 49 09 20 64 04 82 | 01 09 85 80 71 98 00 82 |.@I. d..|....q...|
|000063c0| 08 40 01 10 80 a0 0f 90 | 60 00 42 10 50 58 00 24 |.@......|`.B.PX.$|
|000063d0| 20 04 48 80 22 0e 02 00 | 40 10 d8 08 04 00 00 40 | .H."...|@......@|
|000063e0| 06 04 04 1a 00 08 50 00 | 00 02 04 08 70 98 08 00 |......P.|....p...|
|000063f0| 00 00 1a 33 a0 06 20 16 | 00 0b 11 44 2a 00 89 02 |...3.. .|...D*...|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.